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ABSTRACT 


The  Petite  Amateur  Navy  Satellite  (PANSAT)  is  a  digital  communications  satellite 
to  be  used  by  civilian  amateur  radio  operators.  The  master  ground  station  at  the  Naval 
Postgraduate  School  performs  satellite  commands,  displays  telemetry,  trouble-shoots 
problems,  passes  messages,  and  controls  an  open  loop  tracking  antenna.  This  paper 
concentrates  on  the  telonetry  subsystem,  and  interpretation  with  an  Expert  System.  When 
commanding  the  satellite,  the  ground  station  software  will  verily  the  instruction  with  a 
ground-based  simulator  before  it  is  sent  to  the  satellite.  Telemetry  is  displayed  in  an  easily 
interpretable  format,  so  that  any  user  can  understand  the  current  health  of  the  satellite  and 
be  cued  to  any  problems  and  posable  solutions.  Only  the  master  ground  station  has  the 
ability  to  receive  all  telemetry  and  send  comnumds  to  the  spacecraft;  civilian  ham  users  do 
not  have  access  to  this  information.  The  tdemetry  data  is  decommutated  and  analyzed 
before  it  is  displayed  to  the  user,  so  that  the  raw  data  will  not  have  to  be  interpreted  by 
ground  users.  The  analysis  will  use  C  Lai^uage  Integrated  Production  System  (CLIPS) 
infoedded  in  the  code,  and  derive  its  inputs  from  telemetry  decommutation.  The  program 
is  an  expert  system  using  a  forward  chaining  set  of  rules  based  on  the  expected  operation 
and  parameters  of  the  satellite.  By  building  the  rules  early  in  construction  and  design 
satdlite,  the  telemetry  can  be  well  understood  and  interpreted  after  the  satellite  is  launched 
and  the  designers  may  no  longer  be  avrulable  to  provide  input  to  the  problem. 
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1.  EXPERIENCE  TOUR  AND  LITERATURE  SEARCH 


There  have  been  several  satellite  programs  which  have  used  Artificial  Intelligence  in 
the  design  of  the  system.  Their  use  has  varied  as  much  as  the  satellites. 

The  first  system  studied  was  during  a  6  week  experience  tour  at  the  Navy  Satellite 
Opoations  Cento*  (NAVSOC),  Pt.  Mugu  as  part  of  the  Naval  Postgraduate  School's 
curriculum.  The  center  used  to  be  the  primary  control  center  for  the  Transit  navigation 
satellite  constellation.  Since  the  advent  of  GPS  and  the  obsolescence  of  Transit,  the  center 
has  converted  to  controlling  several  other  satellites,  including  FleetSatCom,  UFO  (UHF 
Fdlow  On),  and  Geosat.  The  center  is  designing  a  new  ground  station  terminal  which 
includes  several  of  the  features  the  PANSAT  ground  station  has,  including  the  Artificial 
Intdligence  qiproach  to  analyzing  the  tdemetiy  stream.  Currently,  due  to  shrinking 
funds,  the  AI.  analysis  has  stopped,  but  the  rest  of  the  syston  is  becoming  operational. 

The  AL  syston  was  to  be  implemented  with  Fortran  as  a  series  of  "if-thtm"  statements. 

By  using  Fortran,  NAVSOC  had  to  write  software  that  not  only  implemented  the  rules, 
but  also  stored  the  assertions,  and  develop  the  conflict  resolution  routines  to  determine 
which  rule  would  fire.  By  using  the  C  Language  Integrated  Production  System  (CLIPS), 
an  Expert  System  shdl  developed  by  NASA  the  programmer  only  needs  to  concern 
himself  with  the  knowledge  base.  The  infeimice  processing  is  inherent  in  the  software 
background. 

Similar  to  the  PANSAT  ground  station,  the  Imitated  Satellite  Control  System 
(ISCS)  at  NAVSOC  is  menu  driven  with  real  time  graphics  fi)r  trending  analysis,  and 
hierardqr  display  models.  The  qrstem  controls  several  satellites,  so  it  goes  one  step  higher 
than  the  PANSAT  gnnuid  station  in  the  hierarchical  di^lay  of  information.  It  combines 
all  telemetry  points  per  sateifite  into  one  status  when  di^layed.  Ifthe  user  wants 
anqpUfyii^  infisrmation  on  a  particular  satellite,  he  seleds  h,  and  can  view  more  detailed 
information  about  eadi  subsystem  and  tdemetry  point.(Ref.  1)  ISCS  differs  fiom  the 


PANSAT  system  in  that  it  performs  analysis  only  when  a  limit  has  been  exceeded. 
Currently,  this  analysis  is  performed  by  the  Satellite  Managers,  without  the  aid  of 
software. 

An  A.1.  system  was  developed  for  Canada's  Radarsat  which  could  bear  many 
amilarities  to  PANSATs  use  of  computer  reasoning.  The  satellite  is  a  civilian  low  earth 
orbiting  radar  platform,  so  comnninications  with  the  satellite  are  infi^uent  and  of  short 
duration.  The  system  must  operate  with  &iled  or  degraded  components,  and  short  term 
power  demands  while  the  radar  is  transmitting  exceed  the  power  output  of  the  solar 
panels.  Depending  upon  the  tasking  of  the  satellite,  it  may  be  commanded  more  than  it 
can  possibly  achieve.  Eadi  radar  pulse  will  drain  the  batteries,  and  if  too  many  missions 
are  tasked,  the  electrical  power  system  wUl  need  to  determine  the  energy  available.  The 
powa*  system  is  greatly  influenced  by  the  combination  of  the  duration  and  fiequency  of 
eclipse,  and  the  duty  cycle  of  the  payload.  Since  the  power  budget  is  well  known  on  the 
ground,  the  tasking  software  uses  nile  based  decisions  to  command  the  satellite  without 
exceeding  the  power  budget.  Any  fluilts  not  yet  detected  and  accounted  for  by  the  ground 
station  v^uch  affect  the  power  system  must  then  be  autonomoudy  handled  by  the 
^Mceoaft  until  the  ground  station  can  analyze  the  situation  and  make  corrective 
adjustments  in  the  satdlite  tasking  procedures.  The  satellite  must  be  able  to  operate 
autonomously  up  to  12  hours  on  a  normal  routine,  and  up  to  two  weeks  as  a  survival 
criterion.(Ref.  2) 

A  satellite  workstation  designed  by  the  Aerospace  Corporation  for  use  in  a  military 
satellite  testii^  operations  is  evaluating  the  use  of  expert  systems.  The  company  decided 
that  their  {nreliiiiinaty  rule  based  system  was  too  liinited.  The  project  was  then  modified  to 
capture  as  much  of  the  oigineering  and  testing  experience  as  possible,  in  a  way  that  could 
be  tqxlated.  The  expandable  library  would  then  allow  the  users  a  much  more  thorough 
analysis  with  an  ever  changing  expert  ^em.  With  the  large  expected  increase  in 
satellites  over  the  next  decade,  the  Advanced  Satellite  Workstation  (ASW)  was  designed 
to  reduce  the  cost  of  ground  control  through  reduced  manpower  requirements.  An 
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integrated  aipport  system  would  require  fewer  specialists,  and  the  repetitive  processes 
would  be  handled  by  the  woricstadon  so  the  oigineers  could  do  more  analysis.  The  system 
also  performed  computationally  intensive  processes,  i.e.  telemetry  decommutation  and 
display,  with  an  off-line  computer.(Ref.  3) 

The  ASW  supplies  several  features  to  aid  satellite  operators,  some  of  which  could  be 
added  to  the  PANS  AT  ground  station  as  the  design  evolves.  One  feature  is  the  ability  to 
quickly  access  satellite  logic  diagrams,  simulations,  and  pictures  of  the  satellite  with 
hypermedia  presentations  to  aid  in  visualization  of  the  flight  spacecraft.  The  telemetry  is 
displayed  very  amilar  to  the  PANSAT  in  a  windows  format.  All  telemetry  is  color  coded, 
and  windows  of  telemetry  data  are  easily  viewed  and  manipulated.  All  commands  are  also 
screen  buttons  and  menus  for  quick  access.  During  a  pass,  both  real  time  and  past  data 
are  downloaded  and  analyzed  with  the  rule  based  expert  system.  Currently  the  system 
uses  around  100  rules  which  determine  maximum  and  minimum  limits,  rate  of  change,  and 
combinations  of  rules  based  on  the  satellite  design  and  operational  experience.(Ref.  3) 

The  Martin  Marietta  Corporation  designed  its  own  system  for  programming  and 
maintaining  expert  systems,  the  Multi  Purpose  Causal  (MPC)  Tool.  This  system  is  based 
on  Lisp,  and  added  several  features  that  make  it  very  easy  to  use.  The  expert  shell  is  set 
iq)  in  a  windows  environment  so  interaction  with  the  system  is  very  user  fiiendly.  It  also 
has  tools  for  numerical  simulation  of  an  operating  system,  and  fault  isolation 
software.(Ref.  4) 

Several  expert  systems  have  also  been  developed  for  space  applications  through 
NASA.  The  systons  are  designed  to  reduce  the  burdensome  tasking  of  the  flight 
ccHitroIlers,  constantly  monitor  the  Space  Shuttle  tdemetry.  The  increase  in 
automated  systems  is  also  desired  in  anticipation  of  Space  Station  requirements,  where  the 
tdemetry  tasking  will  be  dgmficantly  increased.  Before  the  advoit  of  intelligent  software, 
the  flight  cmitrollers  scanned  the  binary  and  numerical  data  displayed  in  monochromatic 
ftmnat  on  thdr  computer  screen.  They  looked  for  familiar  normal  patterns  and  system 
bdiaviOT,  pre-defined  anomalous  bdiavior,  and  unknown  data  sets.  This  was  p^ormed 
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through  memorization  and  recall  of  explicit  patterns,  so  any  increase  in  workload 
drastically  reduced  the  flight  controller's  ability  to  properly  interpret  the  data  with 
accuracy  and  efSciency.  The  flight  controllers  also  suffer  firom  vision  fatigue,  mental 
fatigue,  and  boredom.  When  they  And  an  anomalous  data  reading,  they  must  consult 
volumes  of  system  information  to  isolate  the  fault  and  find  steps  to  alter  the  mission 
according  to  the  degraded  system.  The  automation  of  this  process  frees  the  controllers 
from  the  repetitive  ta^  of  pattern  searching  and  telemetry  interpretation,  and  can  offer 
solutions  in  real-time  to  continue  the  misaon  after  a  system  degradation  is  found.  All 
decisions  are  based  upon  data  firom  the  telemetry  stream.  The  syntax  of  the  CLIPS 
programming  was  set  in  an  orderly  fashion  to  prevent  or  reduce  ambiguous,  and  redundant 
rules.  All  facts  are  represented  by  fields  describing  the  Object-Attribute-Variable  (0-A- 
V).  By  presenting  ail  &cts  in  the  same  format,  the  rules  could  be  more  ea^y  integrated 
and  written.  The  types  offacts  were  state,  timing,  telemetry.  The  assertions  were 
categorized  into  state,  status,  output.(Ref.  S)  These  basic  formats  are  very  similar  to 
those  developed  in  the  program  for  PANSAT. 

The  ultimate  space  application  of  an  expert  system  is  the  Space  Station.  The  number 
of  systems,  and  amount  of  data  will  greatly  outnumber  any  system  now  in  use.  The  use  of 
int^rated,  intelligent  software  will  greatly  reduce  the  number  of  highly  trained  personnel, 
and  increase  the  productivity  of  the  current  set  of  flight  contro]]ers.(Ref  6) 

The  Aerospace  Corporation  also  designed  a  rule  based  expert  system  for 
d^ermiiiing  fidse  events  in  the  telonetry  data  from  an  earth  observing  sensor.  This 
program  used  information  about  the  health  of  the  satellite,  the  sensors,  data  processing, 
knowled^  of  the  problem,  and  physical  phoiomena  that  affect  the  sensors.  The  company 
wanted  to  determine  if  A.I.  techniques  were  feasible  for  satellite  data  considering  the  large 
amount,  the  variety,  and  the  complicated  nature  of  the  system.  The  system  has  to 
distingui^  between  operational  parametm  and  natural  phenomraia,  such  as  reflections  off 
ice-capped  mountains,  and  its  differences  fiom  other  noise  and  signal  sources.  The  expert 
system  developed  was  successful  in  maintaining  ^em  knowledge,  making  quick 
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decisions,  and  giving  explanations  for  those  decisions,  which  inaeased  the  user’s 
confidoice  in  the  expert  system.  The  first  stage  was  to  provide  an  "intelligent  assistant"  to 
new  ami  inexperienced  display  operators.  This  was  accomplished  by  providing 
information  normally  only  available  from  system  engineers  and  analysts.  The  final  goal 
was  to  be  able  to  distinguish  actual  signals  fi-om  the  satellite  from  noise  errors  caused  by 
reflections  ofifice  capped  mountains,  sea  sur&ce  scattering,  and  other  phenomena.  Like 
PANSAT,  the  expert  system  is  data  driven.  In  thdr  system,  the  data  was  imagery  from 
the  satdlite,  while  the  PANSAT  system  uses  telemetry  data  points.  The  Aerospace 
Corporation  found  that  the  expert  system  was  a  viable  approach  to  false  evoit 
detomiiution.  It  surpassed  the  success  of  traditional  signal  processing  techniques  by  an 
order  of  magnitude.(Ref  7) 

Another  project  that  devdoped  an  expert  system  was  the  Oceanographic  Expert 
System  which  could  potentially  be  used  on  Tactical  Environmental  Support  System,  Third 
Generation,  TESS(3)  stations.  The  program  was  developed  to  predict  mesoscale  feature 
movements  in  the  Gulf  Stream  as  an  aid  for  weather  prediction  fi-om  satellite  imagery. 

The  use  of  an  expert  system  was  determined  based  upon  the  observation  that  human 
experts  can  solve  problems  that  convmtional  computer  techniques  caimot.  The  rule  based 
system  doives  its  inputs  fiom  kinematic  aspects  of  the  ocean  surface,  and  predicts  the 
"state"  at  a  later  time.  While  the  system  uses  a  rule  based  program  for  prediction  of  the 
future  of  the  changes,  it  relies  upon  a  transcendental  equation  for  the  location  of  the  Gulf 
Stream  to  make  its  calculations.  The  coeffidents  of  the  equation  are  determined  by  a 
neural  network,  another  type  of  Artificial  Intdligence,  which  in  this  case  reproduces  a  high 
order  equation.  The  system  was  coded  in  a  combination  of  OPS83,  C,  and  Fortran.  The 
programmiiig  structure  most  resembles  PROLOG  of  the  standard  AI.  languages.  Work  is 
underway  to  convot  the  code  to  CLIPS.  In  ordn*  to  run  the  software  on  different 
conqniter  ^ems,  it  must  be  converted  to  a  standard  language.  The  conversion  fi-om 
OPS83  to  PROLOG  would  require  rignificam  changes,  while  CLIPS  provides  an 
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alternative  with  other  advantages,  since  it  can  be  embedded  in  procedural  code  and  called 
as  a  subroutine,  and  is  avail^le  to  all  government  agencies  and  their  contractors.  (Ref.  8) 
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II.  ARTIFICIAL  INTELLIGENCE 

The  basic  purpose  of  Artificial  Intelligence  is  to  represent  knowledge  in  computer 
memoiy,  c^ture  the  essential  features  of  a  problem,  and  make  that  information  accessible 
to  a  problem  solving  algorithm.  The  systm  formally  puts  facts,  rules,  advice,  and 
procedures  into  a  computer  where  that  can  be  manipulated  to  reach  a  final  outcome. 
Knowledge  representation  is  one  of  the  major  successes  of  artificial  intelligence.  The 
solutions  to  many  problems  dq)ends  more  upon  the  availability  of  knowledge  than 
sophisticated  algorithms  for  determining  solutions.  The  knowledge  base  or  rules  are 
computational  objects  and  relationships  that  represent  occurrences  in  the  real  world.(Ref 
9)  The  telemetry  analysis  will  use  CLIPS  imbedded  in  the  C  code,  and  derive  its  inputs 
from  telemetry  decommutation,  and  files  containing  system  configuration  and  satellite 
derived  decisions.  The  program  is  a  forward  chaining  set  of  rules  based  on  the  expected 
opoation  and  parameters  of  the  satellite.  By  building  the  rules  during  the  construction 
and  design  of  the  satellite,  the  telemetry  will  be  very  well  understood  after  the  satellite  is 
launched  and  the  designers  are  no  longer  a>^able  to  provide  input  to  the  problem.  The 
code  will  also  be  well  documented  so  that  rules  can  be  changed,  added,  or  deleted  easily. 
The  rules  may  not  have  the  actual  operating  conditions  well  known  since  the  spacecraft 
has  not  yet  been  built  and  tested,  so  the  operating  limits  may  change.  Another  likelihood 
is  that  a  situation  arises  that  was  not  expected  in  the  design  of  the  satellite,  so  a  new  rule 
will  have  to  be  written  to  account  for  this  situation. 

A  expert  system  iqrproach  was  used  for  several  reasons.  Knowledge  can  be  added 
and  modified  easily  without  major  reprogramming,  and  it  has  interactive  capabilities  for 
explanation,  verification,  and  debugging,  as  well  as  independence  of  the  knowledge  base 
fiiom  tlm  infoence  sjnitem.  A  rule  based  system  can  also  reach  many  conclusions 
depending  upon  the  data  and  the  S3^em.  A  satellite  may  have  problems  in  any  numbo*  of 
systems,  and  the  analysis  must  find  all  conclusions.  The  set  of  rules  is  \^ieie  the  human 
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expof  s  knowledge  about  the  operation  of  the  satellite  and  its  reflection  in  the  telemetry 
data  are  retained.  Rules  can  be  easily  constructed  since  most  engineers  and  experts 
express  problems  in  a  method  of  "for  a  given  situation,  these  actions  must  be  performed". 
Each  rule  then  represents  an  independent  piece  of  knowledge,  and  new  knowledge  can  be 
added  in  a  modular  &shion.  The  results  of  rules  are  assertions,  the  conclusions  of  a  rule 
which  add  to  the  facts  known,  based  upon  the  data.  These  assertions  can  also  be  called 
dynamic  knowledge,  since  they  are  dependent  upon  the  satellite  telemetry,  and  are 
constantly  changing.  (Ref  10) 

The  expert  system  also  has  a  weakness.  These  knowledge  representations  are  not 
robust.  They  caimot  reach  conclusions,  or  make  best  estimates  of  conclusions  that  were 
not  known  before  hand.  The  knowledge  base  only  represents  the  expert's  mind  and  his 
experience.  (Ref  10)  If  a  new  situation  arisM  which  the  expert  has  not  encountered,  he 
cant  possible  express  a  rule  to  search  for  the  conclusion.  Even  if  the  expert  can  quickly 
reach  a  conclusion,  the  analy^  system  v^nt  be  able  to  until  the  rule  base  is  updated. 

This  deficiency  makes  some  A.I.  experts  conader  the  tom  Expert  System  a  misnomer, 
since  the  rule-based  system  bdiaves  more  like  a  novice  that  can  only  perform  as  it  is 
oommanded.(Ref  11) 

The  operation  of  most  A.I.  software  can  be  broken  down  into  two  different 
categories,  backward  chaining  and  forward  chaining,  which  depends  upon  the  type  of 
logical  procedures  used.  Prolog  is  an  exmnple  of  a  backward  chaining  inference  oigine, 
while  CLIPS  uses  forward  chaining  infoence. 

Backward  chaining  is  defined  as  the  procedure  to  reason  fium  goals  to  fiicts, 
redudng  goals  to  subgoals  along  the  way,  and  hoping  that  all  subgoals  are  reduced  to 
Acts  eventually.  This  type  of  processing  is  also  known  as  goal-driven  search,  top-down 
inferaice,  and  consequent  reasoning.  The  steps  tl»  computational  engine  uses  to  solve 
backward  diaining  systems  is  diflBcult  to  follow.  Backward  chaining  should  be  used  whoi 
the  conclusion  is  given,  or  can  easily  be  formulated,  there  is  a  la^e  number  of  rules  that 
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match  &cts,  want  only  one  conclusion,  or  problem  data  are  not  available  and  must  be 
acquired  by  the  problem  solver.(Ref.  9) 

Forward  chaining  is  defined  as  the  process  of  reasoning  from  facts  to  goals, 
producing  new  facts  along  the  way,  and  hoping  the  goals  can  be  generated.  This  type  of 
process  is  also  known  as  data  driven  search,  bottom  up  search,  and  antecedent 
reasoning.(Ref.  9) 

The  procedure  for  forward  chaining  is  simple  to  understand.  The  processing  engine 
scans  the  database  for  the  set  of  applicable  rules.  As  long  as  there  are  rules,  and  the  set  is 
not  empty,  then  the  final  goal  has  not  been  reached.  Then  the  computer  selects  from  the 
set  a  rule  whose  conditions  are  satisfied.  It  applies  the  rule,  and  updates  the  database  if 
necessary.  Then  the  software  scans  the  data  base  for  applicable  rules.  It  selects  another 
rule,  and  continues  the  process  until  there  are  no  rules  whose  conditions  are  satisfied.  At 
this  time,  the  search  has  probed  ail  possible  paths. 


i 
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III.  CLIPS  EXPERT  SHELL 

CLIPS  can  be  thought  of  as  an  "expert-system  shell"  or  "knowledge  engineering 
tool"  rather  than  a  programming  language.  The  system  provides  the  tools  needed  to  build 
a  rule  based  system  while  keeping  the  inference  processing  part  of  the  software  hidden 
fiom  the  user.  CLIPS  was  developed  by  NASA  to  be  easily  embedded  in  C,  and  to  use 
^tax  very  similar  to  the  standard  set  by  Lisp. 

A  programmer  would  want  to  use  forward  chaining  over  other  types  of  software 
when  hb  problem  has  certain  characteristics.  A  forward  chaining  engine  should  be  used 
vidien  all  of  the  focts  are  given,  there  is  a  large  number  of  potential  conclusions,  the  user 
wants  to  reach  every  posable  conclusion,  and  it  is  difficult  to  form  a  conclusion.  All  of 
these  characteristics  of  a  forward  chaining,  rule  based  system  are  t''.’  desired  for  the 
analysis  of  telemetry.  NASA  has  developed  the  CUPS  software  after  many  years  of 
experience  with  satdlkes,  and  numo'ous  other  real-time  operational  projects.  CLIPS  is 
also  designed  so  that  it  can  be  modified  very  easily,  without  afiTecting  the  rest  of  the 
system,  and  the  engineer  can  concentrate  on  the  capturing  of  knowledge  rather  than  the 
low  level  implementation  of  a  rule  systan.(Ref  9)  The  design  constraints  of  PANSAT 
require  that  a  personal  computor  be  used  for  the  ground  station  and  writtoi  in  C  and 
CUPS  is  optimized  for  a  smallo-  machine.  Taldng  ail  of  these  factors  into  account,  the 
software  for  building  an  Expert  Syston  to  analyze  PANSAT  telemetry  is  CLIPS. 

A  CUPS  program  consists  of  three  major  components.  The  first  is  the  knowledge 
base.  This  base  is  the  source  of  system  kno^edge  including  aU  known  ftmts  and  rules  that 
determine  rdationships  between  those  facts.  The  next  irnportam  aspect  is  the  inference 
ermine.  This  conqxrnent  is  the  interpr^o'  for  the  knowledge  base,  and  appli^  the 
knowledge  to  the  solution  of  actual  problems.  The  last  component  is  the  user  interfile, 
udiidi  makes  access  more  comfortable  and  hides  all  of  the  system  complexities.  Thme  are 
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many  variations  in  the  user  interface,  including  menus,  question  and  answer,  language, 
commands,  and  graphical  interhices.(Ref.  9) 

A.  SEARCH  STRATEGIES 

The  software  must  search  through  the  rule  sets  to  reach  a  final  conclusion.  This 
search  is  a  systematic  routine  that  explores  the  problem  space  in  search  of  a  goal  state. 
There  are  several  different  search  strategies  that  can  be  used.  The  two  most  important 
the  dq)th  first  and  breadth  first  strategy.  In  the  simplest  sense,  depth  first  strategy  mesi 
that  the  left  hand  side  or  "iT  side  of  a  rule  that  contains  the  most  recently  asserted  fact  is 
at  the  top  of  the  agenda  list,  which  is  the  list  of  rules  whose  left  hand  sides  are  satisfied. 
The  breadth  first  search  works  the  opposite,  it  executes  the  rule  vdiose  left  hand  side  uses 
asserted  fiu:ts  that  have  been  asserted  earliest.  The  simplicity  strata  is  merely  to  execute 
next  the  rule  that  has  the  least  amount  of  statemoits  on  the  left  hand  side,  while  the 
complexity  strategy  executes  the  rule  with  the  most  statemoits  on  the  left  hand  side  of  the 
rule.  The  lex  strategy  uses  the  depth  first  search,  but  also  uses  complexity  to  break  ties. 
The  computer  can  also  be  set  to  execute  the  rules  in  a  random  order.  The  final  strategy  is 
to  set  the  "salience"  of  each  rule  by  assigning  it  a  value  indicating  priority  and  the  software 
fires  the  rule  with  the  highest  salience.(Ref  12)  If  the  salience  is  set  to  control  the 
program,  then  procedural  code  could  just  as  easily  perform  the  same  function. 

a  DEPTH  FIRST  SEARCH 

In  depth  first  search,  the  seardi  begins  at  the  top  layer  and  proceeds  down  until  the 
search  can  not  continue  any  further  down.  At  this  point,  the  search  backtracks  until  there 
is  another  pos^le  path  that  goes  down.  The  search  then  continues  down  again  until  once 

it  cannot  continue  any  fiirtho-  down.  The  search  thoi  backtracks  again,  until 
another  path  down  is  found,  and  continues  until  all  paths  have  beoi  searched.  The  dqith 
first  search  strata  is  shown  in  Figure  4.1 


Figure  4. 1  Depth  First  Search  Strategy 

The  depth  first  strategy  can  also  be  (^plained  by  stepping  through  the  process  as  the 
computational  engine  would.  Suppose  titt  CLIPS  rules  were  defined  as 

If  Someone  is  a  man,  thra  he  is  male. 

If  someone  is  male,  thm  he  can  be  afioher. 

If  someone  is  nude,  then  he  is  not  fimule. 

If  someone  is  a  man,  then  he  is  an  animal. 

If  someone  is  an  animal,  then  he  must  eat. 

If  someone  is  an  animal,  then  he  is  mortal. 

Assume  that  the  fact  is  Charles  is  a  man. 

This  sinqde  program  could  be  implemoited  in  CUPS  as 

(defiruleman 
(man  ?person>*> 

(assert  (male  ?person)) 

) 

(d^ule  fiither 
(male  7person>=> 

(assert  (can  be_fidha' ?person)) 

) 

(defiule  nmjfemale 
(male  ?person)=‘> 

(assert  (not.fianale  ?person)) 

) 

(defiule  animal 
(male  ?person>«> 
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(assot  (animai  ?person)) 

) 

(d^xileeat 
(animal  7person)=> 

(assot  (must_eat  ?person)) 

) 

(defiule  mortal 
(animal  7person)»> 

(assert  (mortal  7person )) 

) 

In  this  case,  for  a  depth  first  search,  the  first  fiun  asserted  is  (nto/e  Charles).  In  the 
next  layer  down,  the  fiict  (can_be_father  Charles)  is  asserted.  Since  the  search  can  go  no 
deeper,  then  the  search  goes  back  up  to  tlra  male  assertion,  and  then  the  fact  {not  Jemcde 
Charles)  is  asserted.  Once  again,  the  search  can  go  no  deeper,  and  must  backtrack  all  the 
way  to  the  top,  and  the  next  &ct  asserted  is  {animal  Charles).  Searching  under  that 
assertion,  then  the  fitct  {must_eat  Charles)  is  asserted,  followed  by  {jnortal  Charles). 


C  BREADTH  FIRST  SEARCH 

In  the  breadth  first  strata,  the  search  starts  at  the  top  levd.  It  then  proceeds  to  the 
next  level  and  evaluates  each  state  at  the  next  level.  The  search  then  proceeds  to  evaluate 
the  next  level  down  under  each  node  previoudy  searched.  This  continues  until  all  possible 
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The  breadth  first  strategy  can  also  be  explained  by  carrying  out  the  processes  of  the 
compute  with  the  previous  set  of  rules  about  Charles.  In  the  first  step,  {nude  Cnarles)  is 
asserted.  The  next  iteration  carried  out  is  (on/ma/ C/Kir/e5/  Now  all  paths  to  the  next 
layo*  under  the  fiict  that  (mm  Charles)  have  been  explored,  so  the  paths  from  these 
assertions  are  then  followed.  Therefore,  (can  be  father  Charles)  is  asserted,  followed  by 
{not  Jemale  Charles).  Thoi  (must_eat  Charles)  and  (nunial  Charles)  are  assoted.  Even 
though  in  this  case,  the  fiuXs  asserted  were  the  same,  the  assertions  occurred  in  a  different 
mder.  Tins  exanq)le  shows  that  either  strata  can  search  aU  paths,  but  not  all  programs 
can  be  solved  regardless  of  search  strat^.  When  CLIPS  is  loaded,  the  default  strategy  is 
depth  first. 

Fm*  the  program  rules  to  analyze  the  telemetry  fiom  PANSAT,  either  search  strata 
can  be  used.  By  pre-determining  the  ordtf  in  whidi  key  rules  poferm  thdr  operations, 
the  program  will  be  able  to  do  seardtts  on  the  data  without  complications  fiom  reading  in 
the  telemetry  data,  winch  is  a  procedural  process. 

There  are  two  reasons  why  the  data  reading  routines  are  forced  to  be  procedural. 
When  the  dqith  first  strategy  was  used,  the  first  rule  in  the  agenda  list  was  always  the 
"read-data"  rule.  This  caused  the  program  to  read  into  memory  all  of  the  data  in  the 
telemetry  file,  and  assert  those  data  points  as  fiicts.  Since  the  telemetry  file  is  large,  the 
computer  quiddy  runs  out  of  RAM  and  must  store  the  information  on  the  hard  disk,  which 
significantly  slows  down  the  computation.  By  using  the  breadth  first  strategy,  each  data 
pt^  can  be  read  in  singly.  Each  point  is  analyzed,  and  only  significant  information  is 
retained.  The  data  point  is  then  retracted  fiiom  the  foct  list,  and  the  next  data  point  is  read 
into  memory.  In  this  way,  the  least  anxHint  of  focts  are  maintained  in  the  foct  list,  and 
cmnputation  time  is  significantly  reduced.  Even  though  the  program  was  written  to  have 
(mly  (me  data  point  read  at  a  time,  the  rules  still  did  not  properly  work  until  the  rule  for 
reading  in  the  next  data  point  and  ddetii^  the  old  data  did  not  fire  unless  it  was  the  only 
rule  on  the  agenda  li^.  By  setting  the  salience  on  "read-data",  the  program  can  be  run  in 
either  the  dqrth  first  or  Ixeadth  first  seaidL 
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IV.  ORBITAL  DYNAMICS 


The  understanding  of  orbital  mechanics  is  essential  to  the  applications  of  satellites  in 
space.  Every  orbit  has  advantages  and  disadvantages  over  other  choices.  By  designing  a 
spacecraft  around  the  orbit  that  will  be  used,  engineers  can  benefit  fi'om  the  advantages  of 
space  while  minimizing  the  negative  effects  of  the  orbit.  The  orbit  has  several  profound 
effects  on  the  design  of  the  ground  station,  and  the  collection  of  telemetry.  The  distance 
the  ground  station  has  to  communicate  is  directly  related  to  the  power  the  transmitter 
uses.  The  period  of  the  orbit  has  a  direct  impact  on  the  subsystems  of  the  spacecraft. 
When  the  spacecraft  emers  an  eclipse,  it  will  switch  from  solar  power  to  batteries.  The 
satellite  will  also  be  hidden  from  the  heat  of  the  sun  during  eclipse,  so  the  period  of 
tenq)erature  fluctuations  wUl  vary  with  the  orbit  poiod.  The  orbit  also  determines  the 
maximum  amoumoftime  the  satdlite  will  be  in  view  ofthe  ground  station.  Thehigher 
the  ahhude,  the  loiter  the  sat^te  will  be  in  \dew.  The  time  the  satellite  is  in  view  then 
detemunes  the  amount  of  data  that  can  be  transferred  to  and  firom  the  satdlite.  The  length 
(ffthe  eclipse  also  determines  the  battery  parameters.  The  edipse  time  varies  with  the 
rdationship  between  the  sun  and  the  orbital  plane,  and  the  satellite  will  be  designed  for  the 
worst  case  when  the  satellite  is  in  eclipse  the  longest  par  orbit.  In  this  situation,  the 
energy  charged  to  the  batteries  during  the  sunlit  time  must  be  at  least  the  same  as  that 
used  during  the  eclipse,  or  the  batteries  y/iSi  drain. 


A.  ORBITAL  THEORY 

Even  though  the  orbit  remains  in  a  plane,  its  rdationship  to  the  Earth  can  be 
oriented  in  any  direction.  Because  ofthis,  we  need  a  refinence  system  that  relates  the 
ofbit  and  {dane  of  the  satellite  to  the  Geocoitric  Inertial  reference  firame  as  shown  in 
FigureS'l.  Thesystemthatisusedby  the  Air  Force  is  caUed  the  Perift)cai  coordinate 
system.  The  plane  ofthe  system  lies  in  the  plane  ofthe  orbit.  The  X  direction  points  at 


IS 


the  perigee  of  the  satellite,  the  Y  axis  is  in  the  orbital  plane,  90  degree  to  the  X  axis,  and 


Fundamental  Elements: 

Inclination,  i  -  orients  the  plane  in  the  initial  quee.  It  is  the  angle  between  the  angular 
momentum  vector  and  the  North  Pole,  or  between  the  equatorial  plane  and  the  orbital 
plane. 

Right  Ascension  of  the  Ascending  node,  SI  •  orients  the  plane  in  mertial  space,  the 
angle  is  measured  eastward  fiom  the  Vemal  Equinox  to  the  ascending  intosection  of  the 
orbital  plane  and  the  equatorial  plane. 

Aignment  of  Perigee,  <d  -  orients  the  orbit  in  the  orbital  plane,  the  an^e  measured  from 
the  ascending  node  to  the  perigee  of  the  orbit. 

Tkve  Anomaly,  V  •  locates  the  satellite  in  the  orbit,  the  angle  measured  in  the  direction  of 
travel  friom  the  perigee  to  the  location  of  the  satellite. 

a  NEWTON'S  LAWS 

The  motion  of  aU  objects  in  the  universe  is  governed  by  Newton's  three  laws, 
inr^idiiig  the  orbits  of  planets  and  satdlites.  His  second  law,  force  is  equal  to  the  rate  of 
diange  of  rnmnentum,  or 

F*ma 
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is  the  starting  point  for  explaining  orbital  motion.  For  the  gravitational  force,  the 
direction  of  the  force  is  towards  the  other  object,  this  shall  be  in  the  r  direction  as  shown 
in  Figure  5-2. 


Newton's  Law  of  Gravity  states  that  the  force  between  two  objects  is  proportional  to 
the  mass  of  the  two  objects,  divided  by  the  square  of  the  distance  between  them,  or 


mr^- 


GMm 
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where  ^»GM.  G  is  the  univ^aal  gravitational  constant  6.672  x  10 


.  For  the 


sun,  |i  is  1.327  X 10"  ,  while  for  the  Earth,  p  is  3.986x10'^ 

By  balancing  the  centripetal  accderadon  of  the  satdlite  and  the  force  of  gravity,  the 
vdocity  of  the  satellite  in  orbit  can  be  detomined.  According  to  Kepler's  third  law,  the 
period  of  the  orbit  is 


T= 


The  force  of  gravity  must  be  equal  to  the  c«itripetal  acceleration  in  order  for  the  satellite 
to  be  in  a  circular  orbit,  so  the  equation  becomes 


Solving  for  v  yidds 


_  um  mv 

F  =  ma=^= - 

r  r 


This  shows  that  for  a  higher  orbit,  the  vdocity  is  Iower.(Ref  13) 
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C  TWO  LINE  KEPLER  ELEMENTS 

One  of  the  many  systems  used  to  tnumnit  the  orbital  information  on  a  satellite  is  to 
use  the  2  line  element  Kepler  system.  This  is  the  sy^em  used  by  most  bulletin  board 
systems  that  download  satellite  ephemeris,  and  is  used  to  update  the  files  in  the  ground 
station's  tracking  program  InstaTrack.  An  example  of  the  information  in  the  data  files  is 

E  +.11846032+01  +.37358470-02  +.79893359+02  +.90024519402  30490  1  94  1 
E  +.44748849402  +.71002327+02  -.27310065401  +.13061904-02  30490  1  94  2 

The  first  number  on  the  first  line  is  the  soni-miyor  axis  of  the  orbit  measured  in 
Earth  radii.  The  next  number  is  the  eccoitridty.  After  that  is  the  epoch  of  perigee  which 
is  measured  in  kiloseconds  fix)m  midnight.  The  last  number  on  the  first  line  is  the  orbital 
inclination,  measured  in  degrees.  The  next  field  is  the  satdiite  number.  After  that  is  tl» 
date,  followed  by  the  card  or  line  number.  The  first  number  on  the  second  line  is  the 
argument  of  perigee,  (q,  measured  in  d^rees.  The  next  number  is  the  right  ascension  of 
the  ascencUng  node,  Q,  also  measured  in  degrees.  The  third  number  is  the  rate  of  change 
of  the  argument  of  perigee,  measured  in  degrees  per  day.  The  last  number  of  this  line  is 
the  rate  of  change  of  the  right  ascoition  ofthe  ascen^g  node,  also  measured  in  degrees 
per  day.  The  last  set  of  numbm  has  the  same  meaning  as  for  the  first  line. 

D.  ORBITAL  PERTURBATIONS 

If  there  were  no  forces  besides  gravity  centered  at  the  center  of  mass  of  the  Earth, 
thea  the  satellite  would  stay  in  the  same  orientation  for  all  time.  Because  of  many  &ctors, 
this  does  not  happen.  The  effects  ofthe  Sun,  Moon,  and  aU  the  planets,  drag,  solar 
nufiation  pressure,  and  mass  asymmetry  cause  the  orbital  plane  and  the  shape  of  the  orbit 
to  constantly  change.  The  perturbations  are  any  forces  acting  on  the  satellite  which  are 
not  the  muform  grawtational  force  of  the  Earth. 

The  Earth  is  not  a  perfect  ^here,  but  it  is  slightly  flattened,  making  a  bulge  at  the 
equaUK’.  The  northern  polar  r^on  is  also  flatter  than  the  southern,  makit^  a  tiight  pear 
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shape.  The  equator  isnt  perfectly  round  either,  but  is  slightly  elliptical.  The  primary  effect 
of  the  asymmetrical  mass  of  the  Earth  on  a  low  orbiting  circular  satellite  is  changes  in  £2. 

The  rate  of  change  of  the  ascending  node  is  a  function  of  the  altitude  and  eccentricity 
of  the  orbit,  but  is  mostly  affected  by  the  inclination.  An  inclination  of  90  degrees  results 
in  no  change  in  the  ascending  node.  Figure  5-3  is  a  Mathcad  plot  showing  the  relationship 
between  the  rate  of  change  of  the  argument  of  the  ascending  node,  the  inclination,  and 
altitude.(Ref.  13)  As  the  inclination  decreases,  the  rate  of  change  increases  westward  until 
a  maximum  at  a  zero  degree  inclination.  For  a  retrograde  orbit,  the  increase  in  inclination 
results  in  an  increase  in  the  rate  of  change  to  the  East.  For  inclinations  greater  than  90 
degrees,  use  the  positive  value  of  the  inclination  minus  90  degrees. 


Figure  5-3.  Orbit  Precession  with  Respect  to  Orbital  Inclination  and  Altitude 
Everything  in  the  universe  exerts  a  gravitational  force  on  the  satellite,  but  most  are 
n^^bly  small.  For  satdlhes  in  a  high  orbit,  like  geosynchronous,  the  effects  of  the  sun 
and  the  moon  start  to  become  noticeable.  These  mostly  affect  the  right  ascension  of  the 
ascoiding  node  and  the  argument  of  perigee  and  the  forces  are  about  five  to  100  times 
weaker  than  the  perturbing  force  of  the  Earth's  oblateness.  In  order  to  make  corrections 
fisr  muhi-boify  pn^lem,  the  sun  and  moon  are  assumed  to  orbit  the  Earth,  and  an  iterative 
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process  is  used  to  find  the  satellite  at  certain  time  intervals.  This  process  is  very  time 
consuming  and  not  feasible  for  accurately  tracking  large  numbers  of  satellites. 

The  physical  charaaeristics  of  the  launch  site  also  place  constraints  on  the  inclination 
of  the  low  earth  orbit  of  the  satellite.  Launches  from  Cape  Canaveral  must  be  at  least  28.7 
degrees  because  of  the  latitude  of  the  launching  nad.  To  the  North  of  the  launch  site  there 
are  heavily  populated  areas,  consequently  the  upper  limit  of  the  inclination  is  around  70 
decrees.  When  satellites  are  launched  fi'om  Vandenburg,  they  have  to  go  into  a  retrograde 
or  polar  orbit  because  of  the  land  constraints  around  the  base. 

E.  LOW  EARTH  ORBITS 

Many  satellites  are  put  into  a  low  earth  orbit  because  for  varied  reasons.  The  fuel 
required  to  put  a  satellite  into  a  geosynchronous  orbit  make  the  mission  very  expensive, 
while  putting  a  satellite  into  a  lower  altitude  saves  the  added  weight  and  structure  needed 
with  the  more  fuel  required.  At  geosynchronous  orbits,  the  beam  width  of  an  antenna  or 
other  device  must  be  very  narrow  to  get  good  resolution  of  the  Earth  from  the  height  of 
the  orbit.  In  a  low  earth  orbit,  a  larger  beam  ^dth  can  be  accepted  for  the  satellite,  or 
much  greater  resolution  can  be  attained  with  the  same  instrument.  The  main 
disadvantages  of  this  orbit  are  the  increased  atmospheric  drag  and  gravitational  anomalies 
that  are  stronger  at  the  lower  altitudes. 

F.  DETERMINATION  OF  TIME  IN  VIEW 

The  time  that  a  satellite  is  in  view  can  be  detomined  from  simple  gemnetry, 
assuimng  that  the  orbit  is  circular  and  that  the  ground  station  is  in  the  same  plane  as  the 
orbit.  As  shown  in  Figure  5-4,  a  triangle  can  be  made  with  vertices  at  the  center  of  the 
Earth,  the  ground  station,  and  the  satdlite  position  )^en  it  is  E  radians  above  the  horizon. 
Two  of  the  sides  of  the  triangle  are  known,  the  radius  of  the  Earth,  and  the  radius  of  the 
orint.  The  FCC  rules  state  that  a  satdlite  link  cannot  be  made  less  than  10  d^rees  above 
the  horizon,  so  this  will  be  used  as  E. 


visible  arc 


Figure  5-4,  Determination  of  Time  in  View 


From  the  law  of  sines, 

sin(^-d-E)  sin(^  +  E) 

K  " 

The  only  unknown  in  the  equation  is  d,  which  can  be  solved  for.  The  total  angle  in 
view  is  2  X  d .  Once  the  total  period  is  known,  and  with  0  in  radians  to  give  the  partial 
fraction  ofln  radians  for  an  orbit,  then  the  time  in  view  is 

For  the  PANSAT  requested  altitude  of  450  km.,  the  maximum  time  in  view  is  8.6 
minutes.  The  time  in  view  is  a  function  of  both  the  arc  distance  that  the  satellite  passes 
through,  and  the  rate  at  which  it  traverses  oveibead.  The  relationship  between  time  in 
view  and  orbit  altitude  for  an  overhead  pass  is  shown  in  Figure  5-5  which  is  determined 
using  Matlab.  As  the  altitude  increases,  the  arc  traveled  increases  slightly,  but  the  greatest 
contribution  to  increased  time  in  view  is  the  longer  period. 
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Figure  5-5,  Plot  of  Time  in  View  vs.  Altitude 
In  general,  there  are  two  to  three  passes  in  a  row  of  a  low  earth  orbiter,  then  the 
next  pass  is  about  ten  hours  lata-  as  the  station  rotates  to  under  the  opposite  node.  If  one 
pass  is  near  the  nuudnaim  time  overhead,  the  other  two  are  significantly  shorter.  If  the 
inclination  is  only  28.7  degrees,  then  a  ground  station  in  Monterey,  CA  may  only  have  one 
period  daily  when  communications  are  possible. 

G.  DETERMINATION  OF  TIME  IN  ECLIPSE 

Since  PANSAT  will  be  in  a  low  earth  orbit,  it  will  emer  eclipse  on  every  orbit.  The 
eclipse  is  caused  by  the  satelhte  ratering  the  shadow  where  the  Earth  blocks  the  sun,  as 
shown  in  Figure  5-6.  The  duration  of  tte  eclipse  constantly  changes  with  the  seasons 
since  the  declination  of  the  sun  moves  firom  plus  to  minus  23.45  degrees  and  orbit  plane 
orientation  as  it  precesses. 
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To  Sun 


Figure  5-6,  Earth  Shadow  Intersecting  Orbital  Plane 


This  change  in  the  angle  between  the  sun  and  the  plane  of  the  orbit  determines  the  time  of 
eclipse.  The  intersection  of  the  Earth's  shadow  and  the  plane  of  the  orbit  make  another 
dlipse,  whose  equation  (Ref  1 1)  is 


V 


R. 


(t)'- 


1 


V  y^s) 

Since  x  ^rcoi0miy  s r ^  then  the  equation  becomes 


cos^ 

To  rdate  the  angle  0  to  the  period,  it  must  be  found  in  radians.  Then  the  total  eclipse 
poiod  can  be  found  as 

*  n 

The  eclipse  time  is  the  maximum  when  the  sun  is  in  the  orbital  plane,  or  5  =  0 
d^rees.(Ref  14)  For  the  PANSAT  in  a  nominal  Space  Shuttle  orbit,  this  relates  to  an 
maximum  eclipse  period  of  35.9  minutes.  The  maximum  percent  time  in  eclipse  is  then 
38.4%. 


B=  cos*' 


[ 
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a  SIGNIFICANCE  TO  GROUND  STATION  AND  A.  I.  ROUTINES 

The  tdemetry  analysis  will  use  only  the  telemetry  data  stream  to  make  its  decisions. 
Tlw  satdlite  events  will  be  compared  with  the  time  the  satellite  leaves  eclipse,  and  reoiters 
sunlight  as  determined  by  the  telemetry  itself.  This  comparison  will  determine  if  there  is  a 
correlation  between  the  fault  and  the  orbit. 

The  ground  station  must  also  know  the  ephemeris  of  the  satellite  in  order  to  track  it. 
Since  the  system  is  open  loop,  the  antenna  points  to  the  predicted  position.  If  the 
ephemeris  is  incorrect,  or  the  ground  station's  time  is  of^  then  the  antenna  will  not  be 
pointing  at  the  satellite.  The  time  is  also  very  important  in  determining  the  Doppler  shift 
of  the  satellite.  If  the  time  is  off  by  only  20  seconds,  then  the  Doppler  shift  will  be  off  by 
400  Hz.  This  could  cause  the  system  to  not  link.  The  ephemeris  of  the  satellite  is 
constantly  changing  due  to  unaccounted  perturbations  in  the  gravitational  fidd,  and  drag 
not  accounted  for  in  the  2  line  ephoneris  system.  The  data  will  need  to  be  updated 
r^ularly  for  the  ground  syston  to  track  PANSAT. 
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V.  THERMAL  CONTROL 


The  heat  input  to  a  spacecraft  varies  widely  in  the  space  environment.  When  the  sun 
lights  on  an  object  in  space,  the  only  method  to  transfer  heat  is  in  the  form  of  radiation. 
This  solar  flux  all  but  disappears  when  the  satellite  enters  the  Earth's  shadow  and  only 
reflections  and  emissions  fix)m  the  Earth  and  moon  affect  the  heat  transfer.  Since  the  solar 
flux  is  approximately  1358  W  per  square  meter,  the  satellite  must  be  able  to  opiate  in 
both  extremes,  fix)m  zero  to  maximum  flux.  In  the  sunlight,  the  temperature  increases 
significantly  as  the  spacecraft  absorbs  the  sun's  radiation.  In  eclipse,  the  tonperature 
decreases  rapidly  as  the  satellite  radiates  energy  to  space.  The  thermal  properties  of  the 
satellite  must  be  well  known  before  the  satdlite  is  launched  to  insure  correct  operation  at 
all  possible  extremes  of  the  temperature  range. 

A.  LAWS  OF  THERMAL  RADIATION 

An  ex|}laaation  of  thermal  radiation  can  be  found  in  quantum  mechanics.  A  black 
body  emits  radiation  at  all  waveloigths.  and  is  modeled  with  Planck's  Radiation  Formula 

2xhc"A-* 

^  _  j 

>i«diere  £  =power  radiated  per  unit  area  of  the  body  per  wavelength,  c^  speed  of  light, 
3*10*  m/sec;  1^  Planck's  constant,  J-s;  k  =  Boltzmann's  constant,  1.38‘10"” 

J/K;  T  » temperauire  in  Kdvins;  and  waveloigth  in  meters.  Knowing  the  tenq)erature 
of  the  emitting  body,  the  total  amount  of  power  radiated  per  unit  area  can  be  determined 
by  int^rating  Planck's  Law  over  all  wavdoigths,  fi'om  zero  to  infinity,  or 

f2xhc^.r^, 

“  J  -di/UT 

0  ^  * 

which  results  in  the  Stefim-Boltzmann  Law 
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The  constant  a  is  the  Stefiu-Boltznuum  constant,  5.67  •  10'*  2„4 .  The  final  product 

of  the  equation  has  units  of  •  The  total  power  radiated  by  the  body  is  found  by 
multiplying  by  the  total  sur&ce  area.(Ref  IS) 

These  laws  apply  only  if  the  source  of  radiation  is  a  black  body,  one  that  absorbs  all 
enetgy  at  all  wavelengths,  and  emits  at  all  wavelengths  according  to  the  body's 
temperature,  which  is  usually  not  the  case  in  the  physical  world.  The  emission  dififermce 
between  the  actual  body  and  a  black  bo<fy  is  wavdength  dq)endent,  determined  by  the 
actual  rate  of  onission  compared  to  a  black  body  at  the  sante  temperature.  This 
comqMuison  is  called  the  monochromatic  onissivity,  .  The  monochromatic  absorptivity 
is  calculated  similarly,  and  is  denoted  by  a^i.CRef.  IS) 

The  same  equations  can  be  used  to  determine  the  temperature  of  the  solar  cdls, 
which  is  important  in  determining  the  number  of  cells  needed  to  power  the  spacecraft 
since  the  power  varies  with  temperature.  The  solar  cdl  determination  makes  a  change  to 
the  equations  so  they  will  be  appticable.  The  solar  array  uses  some  of  tlm  energy  that  is 
absorbed  to  nudee  dectridty,  so  it  is  not  converted  into  heat.  Tins  is  accounted  for  by  the 
eflfective  absorptivity  as 

a«=a.-FpTl. 

In  this  equation,  the  Fp  is  the  paddng  &ctor  of  the  solar  cdls  on  the  array,  r\  is  the  solar 
cdl  efiBdmicy ,  and  a,  is  the  solar  absorptivity.(Ref.  14) 

The  total  energy  transferred  by  the  eimttar  is  then 

q  =  <Tse(r-T^) 

vdiere  s  is  the  surftice  area  of  the  emitter,  and  Ij,  is  the  temperature  the  energy  is  radiated 
to,  whether  it  is  space  or  another  body.  Within  the  spacecraft,  the  radiation  between  two 
conqKments  is  also  dependent  upon  the  q)atial  rdationship  between  the  emitters  and  the 
power  dissipated  by  each  component.  This  will  account  for  the  &ct  that  not  all  energy 
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emitted  by  a  source  can  be  intercepted  by  anotho-  body.  These  factors  are  known  as 
shape  fiwtor,  arrangonent  &ctor,  and  view  factor;  Figure  6-1  illustrates  these  factors. 


The  shape  fiictor  is  found  fiom 


a 

sm 


cos^lcos#2dSldS2 


SIF 


AI2 


and  the  radiation  fitmi  one  surfiwe  to  another  is  then 

The  tenq)eratures  are  those  of  the  respective  bodies.  The  energy  radiated  from  S2 
back  to  SI  can  then  be  found  in  the  same  way.(Ref.  IS)  When  the  configuration  of  a 
^MceCTaft  is  known,  then  this  procedure  must  be  used  to  determine  the  shape  fiuttors,  and 
energy  transmitted  from  each  surfiue  to  all  othos  within  the  spacecraft.  WhenaU 
equations  are  solved  fr)r  the  suiftce  temperature,  then  the  solution  is  found.  Thoeare 
dififerent  methods  for  determining  the  final  tonperature.  The  first  is  to  use  an  iterative 
method,  where  the  temperatures  are  assumed,  and  the  emittance  is  found.  Thoithe 
tenq)eratures  are  changed  to  correct  for  the  absorptance  fiom  other  surfiices,  and 
ctmtinues  until  the  steady  state  temperatures  are  found.  The  syston  of  equations  can  also 
be  set  up  as  a  resistor  network,  where  each  surfoce  is  a  node  whose  energy  flow  is 
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rqMreseoted  by  a  voHage,  and  the  reststance  corresponds  to  the  shape  &ctor,  the  current 
represents  the  radiant  energy.  There  are  software  programs  and  tables  to  aid  in 
determining  the  shape  &ctors  and  temperatures.  (Ref.  15) 

If  the  satdlite  has  an  extreme  temperature  range,  there  are  a  couple  of  solutions  to 
consider  in  the  design.  One  solution  is  to  deagn  a  radiator  to  emit  excess  heat  to  space. 
The  size  of  tltt  radiator  is  a  function  of  its  properties,  and  the  amount  of  heat  that  needs  to 
be  rtissipated.  The  ideal  radiator  would  have  mimmal  idMorptance  and  maximum 
reflectance  at  its  operatii^  temperature.  Due  to  exposure  to  the  space  environment, 
radiators  lose  some  of  their  ability  to  emit  heat  over  time,  so  the  worst  case  for  heating  the 
spaceoaft  ha{^)ens  at  the  end  of  life.  Heat  is  created  in  the  spacecraft  by  electrical 
resistance.  The  equation  for  determining  the  aze  of  the  radiator  is 

A - - 

Ti*e«o*T  -a*S*sm(8) 

udiere  P  is  the  power  is  to  be  dissipated  fiom  the  spacecraft,  q  is  the  efficiency  of  the 
radiatcH'  due  to  reflections  off  structures,  and  T  is  the  hi^iest  tolerable  temperature  in  the 
^Mcecraft  design.  Sis  the  solar  heat  input,  and  5  is  the  inddeocean^.  Therestofthe 
spacecraft  is  covered  with  insulation  to  prevent  either  the  gain  or  loss  of  heat  whidi  is  not 
be  modeled  or  compensated  for.  When  the  radiator  is  not  feeing  the  sun,  then  the 
temperature  can  be  found  as 

T=s[P/ii*8*a-A]'^*. 

In  edipse,  the  lowest  posable  temperature  is  found  with  q  equal  to  1.0.(Ref  14) 

Another  solution  to  change  the  temperature  range  is  to  add  heaters  to  the  satdUte. 

In  this  situation,  the  satellite  draws  energy  other  fi^m  the  solar  cdls,  or  the  batteries  to 
power  heaters,  which  convert  the  energy  into  additional  heat  dissipation.  This  translates 
into  a  higher  spacecraft  teinperatuie. 
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a  THERMAL  CONTROL  OF  PANSAT 

In  detennining  the  thennal  characteristics  of  PANSAT,  there  are  several  factors  that 
are  a  given.  The  heat  input  of  the  sun  in  well  known,  as  well  as  the  albedo  of  the  Earth 
and  moon.  The  solar  paneb  which  cover  the  miyority  of  the  spacecraft  also  have  a  known 
emissivity  and  abstMptivity.  Once  the  spacecraft  configuration  and  components  have  been 
determined,  and  the  {vocess  of  finding  the  thermal  balance  of  the  syston  can  begin. 

Due  to  the  limited  power  margin,  the  thermal  control  of  the  spacecraft  will  be 
passive.  The  solar  cells  and  the  open  comm  will  absorb  the  heat  as  well  as  transmit  heat 
to  ^Mce.  The  majcH'  energy  dissipation  will  come  fit>m  the  batteries,  the  digital  computer, 
and  the  communications  receivers  and  transmitters. 

Once  a  thermal  model  ofthespaceoaft  can  be  progranumd,  then  the  operational 
limits  ofthecoo^KMientsofthe  spacecraft  will  be  known.  The  thermal  range  of  the 
satellite  will  be  well  modeled  and  tested  beft>re  launch.  From  preliminary  analysis 
perfimned  by  Profiessor  Kraus  of  the  Naval  Postgraduate  School,  the  satellite  will  not 
have  a  problem  with  overheatii^ 

C.  THERMAL  DECISIONS 

The  Artificial  InteUigence  decisions  of  the  thermal  control  system  will  tmly  be  able  to 
check  on  the  operation  of  the  system  since  it  is  totally  passive.  The  only  possible 
corrections  fi)r  a  passive  system  once  it  is  in  orbit  will  be  either  to  shut  down  systems  to 
coot  offtbe  spacecn^tH- to  use  mote  oftbesysteau  to  increase  the  temperature.  In 
PANSAT,  the  only  system  that  can  be  controlled  to  have  an  effect  on  the  temperature  of 
the  satellite  win  be  the  communications  sub^em.  Ifthetransmitta’ gets  too  hot,  then 
the  Digital  Control  System  logic  may  be  set  up  to  not  transmit.  This  will  cause  the  energy 
to  be  dissipated  in  other  subsystems.  Another  possibility  is  that  the  attoiuation  level  on 
the  transmitter  can  be  increased,  so  not  as  much  oiergy  is  transmitted,  and  therefore,  less 
heat  is  generated.  On  the  other  hand,  if  it  gets  too  cold,  it  can  constantly  trananit  to  heat 
up  the  spacecraft.  Thb  sohitmn  runs  into  the  problon  of  the  spacecraft  not  having  enough 
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power  inai:gin  in  the  batteries  to  allow  constant  transmissions  throughout  an  eclipse.  The 
redundancy  of  ^sterns  on  board  can  also  help  in  the  thermal  control.  If  a  subsystem  is 
having  temperature  problems,  the  altemate  can  be  selected  which  does  not  appear  to  have 
the  same  dilraima.  Operations  can  also  affect  the  temperature  of  the  batteries.  If  the 
batteries  are  overheating,  and  they  are  bdng  fiiUy  charged,  then  a  trickle  charge  could  be 
used.  Instead  of  possible  overchaiging  the  batteries,  they  will  remain  charged,  but  won't 
convert  excess  energy  into  heat. 
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VI.  POWER  SYSTEM 


The  design  of  the  power  system  for  PANS  AT  has  taken  a  different  course  than  for 
the  typical  satellite.  Rather  than  the  payload  determining  the  amount  of  power  that  is 
required  of  the  syston,  the  physical  dimensions  and  design  of  the  satellite  restrict  the  size 
of  the  solar  panels,  and  therd)y  determine  the  total  power  available.  The  satellite  will  have 
17  solar  pands,  each  7. 125  inches  square,  capable  of  producing  6. 12  Watts  each  at  15.82 
volts  at  AMO  and  28**  C  .(Ref  16)  Afta*  much  deliberation,  the  power  storage  will  use  X- 
rayed  and  intensdy  inspected  commercial  Nickel  Cadmium  (NiCad)  batteries  instead  of 
space  qualified  cdls.  This  greatly  reduces  the  total  cost  of  the  power  system,  and  has 
proven  efiective  in  other  amateur  satellite  desi^. 

The  power  constraints  on  the  satellite  have  left  v^  little  nungin  for  error.  The 
power  system  is  also  generally  the  one  that  gives  the  satdlites  the  most  problems  if  they 
are  poorly  designed.  TIw  success  of  the  entire  satellite  rests  upon  the  power  that  it  can 
produce,  and  fiuctuations  can  cause  havoc  in  other  subsystems.  The  power  system  must 
be  able  to  switch  fiom  external  solar  powo-  to  internal  batteiy  power  without  miyor  power 
spikes,  or  fiuctuations.  Since  the  period  is  on  the  order  of  90  minutes,  the  power  syston 
will  be  continually  cycling  between  all  modes  of  operation. 


A.  SOLAR  ARRAY  DESIGN 

In  designing  the  solar  arrays,  PANSAT  is  limited  by  the  size  of  its  pands  that  the 
solar  cdb  will  be  mounted  on.  The  pands  are  designed  by  Spectrolab,  Inc.,  and  meet  the 
specifications  determined  by  the  Space  Systons  Academic  Group.  Since  a  low  Earth  orbit 
is  not  a  harsh  radiation  environment,  solar  cells  do  not  need  to  have  exceptional  reastance 
to  radiation.  The  total  radiation  dose  over  the  lifistime  of  the  satellite  as  determined  by 
Spectrolab  Inc.  is  a  fiuence  of  1.80  x  10'^  1  MeV  equivalent  dectrons.  A  fused  silica 
coverslide  of  30  mils  thidc  will  block  all  of  the  hi^  eoetgy  protons  and  offer  added 
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protection  during  construction,  testing,  and  launch  operations.  The  ceil  chosen  is  a  Series 
6700,  back  surface  field,  back  surfiu:e  reflector,  10  ohm  which  is  1 .92  cm.  by  4.00  cm.  At 
the  beginning  of  life,  (BOL),  the  cell  characteristics  are  open  circuit  voltage  (Voc)  60S 
mV,  and  short  circuit  current  (Isc)  319  mA.  There  are  several  factors  that  degrade  the 
solar  ceUs  over  the  lifetime  of  the  satellite.  The  first  factor  is  a  darkening  of  dqx>sits  on 
the  fiised  siUca  coverslip  and  the  adhesive  used  to  attach  the  coverslip  to  the  solar  cdl. 
This  causes  a  degradation  of  the  cell  short  circuit  current  less  than  1%.  On  short  duration 
missions,  Spectrolab  assumes  mioometeorites  cause  little  or  no  power  loss  so  the  total 
loss  was  assumed  to  be  .98%  for  both  &ctors.  The  nufiation  also  causes  reduced 
efiBdoicy  within  the  solar  cells.  Over  the  lifetime  of  the  satellite,  the  predicted  end  of  life 
(EOL)  values  are  predicted  to  be  .965  of  the  BOL  volts  at  nuudmum  power  (Vmp),  and 
.978  of  the  BOL  amps  at  maximum  powtf  (Imp).  There  is  also  a  pand  wiring  loss  of  .017 
volts  which  reduces  the  usable  power  fi^m  the  solar  cells.  Taking  all  of  these  fiu:tors  into 
account  makes  the  EOL  performance  21.67  Watts  at  15.27  volts,  when  the  satellite  is  in 
the  most  fitvorable  attitude.(Ref.  16)  The  current  of  a  solar  cdl  fidls  off  as  the  cosine  of 
the  angle  the  sun  makes  perpendicular  to  that  cell,  which  in  turn  makes  the  paml  power 

drop  The  four  rides  are  45*’  ofif  of  the  ride  fiwing  the  sun,  so  the  power  of  each  is 
times  the  power  of  the  ride  facing  the  sun.  Adding  aU  sides  together,  the  total  power  is 

then  ^1 + j  times  the  maximum  powo*  of  one  side.  The  EOL  values  assume  summer 

solstice  solar  flux,  28”  C  and  90”  inddmce  angle  to  one  of  the  faces  with  four  acyacent 
panels  bring  partiaUy  lit.  The  solar  panel  power  is  reduced  by  diode  losses  before  the 
satellite  can  use  that  power  on  the  spacecraft  electrical  bus. 

The  solar  array  temperature  found  in  the  thermal  control  analysis,  with  the 
temperature  coefficient  for  current,  a,,  and  voltage,  a^,  are  used  to  verify  the  panel 

characteristics.  With  these  factors,  the  cell  current  at  the  EOL  can  be  found  using 
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In  this  equation,  T  is  the  temperature  of  the  ceils,  is  the  design  factor  for  assembly 
losses  in  current,  Kq  is  the  factor  for  environmental  degradation,  and  is  the  solar 
intensity  factor.  The  temperature  of  the  cells  will  be  the  lowest  when  the  satellite  leaves 
eclipse,  so  this  is  when  the  high  power  point  can  be  expected.  The  voltage  requirements 
of  the  bus  must  also  be  met.  The  voltage  p^  ceil  is  given  by 

V  =  [y,-AV+a,(T-25)].K, 

where  AV  is  the  panel  wiring  loss  p^  cell,  and  is  the  radiation  degradation.  The 

number  of  cells  in  series  can  then  be  found  by 

^  bus  voltage  +  bus  voltage  drop 
’  cell  voltage 

The  solar  panels  are  then  connected  in  parallel  to  the  solar  bus,  which  powers  the 
electrical  system  bus  and  charges  the  batteries.  The  same  equations  are  used  to  insure  that 
the  power  requirement  will  be  met  during  the  winter  solstice  when  the  solar  flux  is  higher, 
which  raises  the  cell  tenq)erature,  which  has  an  effect  on  the  total  power.(Ref.  14) 

B.  DESIGN  OF  BATTERY 

The  deagn  of  the  battery  cells  is  based  upon  a  solar  cell  output  of  15.27  Volts,  and  a 
battery  voltage  at  least  1 1  volts.  The  depth  of  discharge  for  the  batteries,  DOD,  is  an 
extremely  conservative  10%,  and  the  EOL  voltage,  Vd,  for  a  fully  charged  battery  is 
expected  to  be  1.3  volts  per  cell.  According  to  the  equation 

Vdb  =  (N-l)Vd-Vdd, 

the  number  of  ceils  is  10  when  the  voltage  drop  of  the  bypass  diode,  Vdd  is  .7  V.  At  the 
EOL,  the  actual  bus  voltage  will  be  12.3  volts  assuming  no  cells  &il,  since  (N-1)  takes 
into  accmint  that  one  of  the  cells  may  short  circuit.  The  required  cell  capacity  was  found 
by  using 
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Vdb-DOD’ 

where  P  is  the  power  required  from  the  batteries,  and  t  is  36.6  min.  for  a  Shuttle  orbit.  For 
PANSAT,  5  amp-hr  batteries  have  been  selected. 

The  next  step  is  to  determine  the  power  required  to  charge  the  batteries  during  the 
solstice  and  equinox  seasons.  Using  C/1 5  for  charging  when  in  a  maximum  eclipse 
orientation,  and  a  current  of  .33  amps,  the  power  required  to  charge  the  batteries  is 
~  current-  voltage .  Assuming  a  charging  eflBciency  of  90%,  the  time  to  recharge 

from 


Pt 


is  85.9  minutes.  This  time  to  recharge  the  batteries  is  more  than  the  time  in  sunlight  per 
orbh,  so  the  satellite  will  not  be  able  to  operate  at  full  ctq>ability.(Ref.  14)  By  combining 
the  tune  to  recharge  equation,  with  the  eclipse  and  period  equations,  the  relationship 
between  the  oibh  and  the  electrical  syston  becomes. 


f  ^ 
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For  the  full  satdlite  capabilities,  the  satellite  orbit  would  have  to  be  1,602  km.  in  order  for 
the  batteries  to  be  able  to  recharge  fully  emy  orbit.  If  the  orbit  is  set  at  450  km.,  then 
the  eclipse  pow^  consumption  would  have  to  be  less  than  7.28  W. 
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C.  BATTERY  CIRCUITS 

The  battery  circuits  for  operating  the  pow^  system  are  controlled  by  signals  from 
the  Digital  Control  System  (DCS),  shown  in  Figure  6-1 .  When  the  DCS  sends  a  signal  to 
enable  any  of  the  charge  circuits,  it  controls  the  current  through  the  transistors  which  then 
allow  current  to  flow  to  or  from  the  battery. 

Current 


Figure  6-1,  Electric  Power  System  Block  Diagram 


When  the  satellite  is  in  the  sun,  the  electrical  bus  voltage  will  be  higher  than  the 
battery  voltage,  so  the  diodes  prevent  the  batteries  from  chaiging  directly  off  the  power 
bus,  as  can  be  seen  in  Figure  6-2.  Instead,  the  DCS  senses  the  power  voltage  and  current, 
and  detomines  that  the  satellite  is  in  the  sun,  and  the  batteries  can  be  charged.  When  the 
DCS  notices  that  the  bus  voltage  is  lower  than  the  power  bus,  then  the  batteries  are 
powering  the  electrical  bus,  and  the  charge  circuitry  is  commanded  "off*. 


Figure  6-2.  Battery  Charging  Circuit 


The  battery  charging  system  also  has  a  trickle  charge  capability  shown  in  Figure  6-3. 
In  the  present  design,  this  will  only  be  used  i^en  the  cells  are  completely  dead.  If  the 
batteries  have  no  or  very  little  voltage,  as  is  expected  when  the  satellite  is  jettisoned  from 
the  launch  platform,  a  frust  charge  can  damage  the  batteries.  The  trickle  charge  is  used  to 
charge  the  batteries  until  they  can  be  safely  charged  at  the  full  rate. 

Solar  Panel  Bus 


The  batteries  must  also  be  periodically  drained  to  reduce  the  memory  effect  that 
plague  NtCad  batteries.  If  the  batteries  are  not  reconditioned,  then  they  eventuaUy  lose 


the  ability  to  fully  charge.  This  is  prevmted  by  draining  the  batteries  through  resistors  to 
ground,  see  Figure  6-4.  Since  the  batteries  are  deagned  so  that  each  one  can  power  the 
spa^craft  during  eclipse,  the  cell  reconditioning  can  occur  over  several  orbits  and  one  set 
of  cells  is  reconditioned  at  a  time.  The  interval  to  recondition  the  batteries  is  a  function  of 
the  depth  of  discharge,  and  the  information  is  provided  by  the  supplier. 


Figure  6-4.  Batt^  Discharge  Circuit 


There  may  also  be  problems  during  the  sunUght  operations.  There  is  a  Mgnififaint 
drain  on  the  power  system  when  the  communications  system  is  working.  If  the  solar  cells 
are  not  producing  enough  power  run  the  satdlite  and  transmit,  then  the  batteries  will 
suppfy  the  extra  current  needed  to  operate  the  ^stem. 

There  are  a  couple  of  possible  reasons  vdiy  the  spacecraft  would  operate  in  the 
negative  powa*  margin  region.  The  first  is  that  the  bottom  panel  without  a  solar  panel 
may  be  predominantly  facing  the  sun.  In  this  attitude,  the  spacecraft  receives  significantly 
less  power  than  for  ^^ch  the  sjrstem  is  designed.  The  power  system  design  assumes  that 
at  least  the  average  overall  power  is  available  at  all  times.  Almost  any  orientation  and  spin 
axis  that  the  satellite  takes  on  after  ejection  will  have  the  posability  that  the  power  margin 
will  be  n^attve  at  some  time.  If  in  sunlight,  the  satellite  will  also  probably  be  negative  on 
the  power  Imdget  only  during  transnusrion.  Uring  all  aatehite  c-ypabilitii>a  Huring  ^lipse 
draws  more  powo*  than  can  be  recharged  during  the  next  sunlit  period,  so  the  operational 
diaracteristics  of  the  satelhte  must  be  reduced  account  fijr  this  power  loss. 
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Depending  upon  the  severity,  and  the  number  of  occurrences  of  power  problems,  the 
power  budget  could  be  a  miyor  obstacle,  or  a  minor  inconvenience.  If  the  power  budget  is 
not  agnificantly  draining  the  batteries  during  the  charge  cycle,  then  there  may  be  no 
corrective  action  needed.  It  could  very  well  be  that  the  satellite  only  goes  into  a  negative 
power  budget  when  the  blank  panels  is  &cing  the  sun,  and  the  satellite  is  transmitting. 
D^)ending  upon  the  attitude  of  the  spacecraft,  and  the  duty  cycle  of  the  communications, 
this  may  occur  very  seldom.  On  the  other  hand,  the  satellite  could  have  a  spin  axis  and 
attitude  where  its  bare  panel  faces  the  sun  during  a  significant  part  of  the  orbit.  In  this 
case,  drastic  measures  may  have  to  be  takoi. 

Since  the  satellite  can  san:y)le  and  read  the  solar  cell  telemetry  at  will,  the  satellite 
could  only  transmit  when  it  reads  oiough  current  firom  the  solar  cells  to  power  the 
transmitting  spacecraft.  Another  conclusion  could  be  to  not  transmit  at  night,  during 
eclipse.  This  would  keep  the  batteries  as  highly  charged  as  possible,  so  that  they  could 
supplement  the  solar  panels  during  daytime  transmissions. 

From  the  manu&cturars  documentation,  the  rdationship  between  battery  voltage, 
tenqierature,  and  load  can  be  determined  ^^len  the  batteiy  is  fully  chaiged.  Since  the  load 
on  the  batteries  can  be  determined  fi^m  batteiy  current  telemetry,  and  the  voltage  and 
temperature  are  also  known,  it  can  be  detmnined  if  the  batteries  are  fully  charged.  By 
lineariring  the  suppliers  plots  of  voltage  and  temperature,  the  equation  of  a  line  will 
determiim  if  the  batteries  are  at  or  above  the  voltage  threshold  for  a  given  temperature.  If 
so,  the  rule  detomines  that  the  batteries  are  fully  chaiged. 

There  are  a  couple  reasons  why  the  battery  voltage  may  be  too  low.  As  the  batteiy 
drains,  and  hs  temperature  changes,  the  voltage  will  vary  constantly.  The  Iowa*  the 
tenqierature,  and  more  drained  the  battoy  is,  the  lower  the  voltage  will  be.  If  the  powo* 
margin  is  such  that  the  batteries  are  not  fiilly  chaiged  as  the  satellite  enters  eclipse,  thmi  as 
the  batteries  drain,  their  voltage  may  drop  below  limits.  The  batteries  also  have  a  memory 
effect  so  that  they  do  not  woric  as  well  after  they  have  beat  used  and  not  completdy 
disduuged. 
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A  high  battery  voltage  must  be  caused  by  the  spacecraft  power  system  since  a 
battery's  voltage  is  limited  by  the  potential  of  the  chemical  reaction  within  the  battei  y.  The 
charging  circuit  on  the  satellite  uses  the  solar  cell  bus  to  supply  excess  power  to  the 
batteries  for  charging.  The  electrical  power  system  will  charge  the  batteries  at  a  fiill 
charging  rate  at  all  times.  It  is  expected  that  with  the  satellite's  low  power  margin  that  the 
current  flow  will  be  low  and  voltage  within  limits. 

Dqrending  upon  the  spacecraft's  attitude,  it  may  receive  more  power  than  expected, 
which  could  in  turn  lead  to  excess  heat  in  the  batteries.  The  battery  temperature  is  closely 
tied  with  the  battery  voltage.  As  in  the  high  voltage  case,  a  high  temperature  could  be 
caused  by  over  charging  the  batteries,  or  charging  them  too  fast. 

The  bus  voltage  is  directly  tied  to  the  battery  charging  rate,  so  if  the  bus  voltage  is 
out  of  limits,  the  satellite  should  trickle  charge  the  batteiy  to  limit  the  charging  current 
flow.  A  high  transmitter  bus  voltage  is  also  directly  tied  to  the  electrical  power  system 
bus,  so  there  is  most  likdy  a  problem  in  the  ovoall  power  system. 

When  the  satdlite  first  comes  back  into  the  sun,  the  solar  cells  are  at  thdr  lowest 
temperature,  and  highest  voltage.  As  the  cells  heat  up,  they  do  not  produce  as  much 
power. 
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VII.  SATELLITE  CONFIGURATION 


The  satellite  has  several  redundant  subsystems,  shown  in  Figure  7-1,  so  the  overall 
probability  of  a  successfiil  mission  life  are  greatly  increased.  The  satellite  has  only  one 
power  source,  the  solar  cells,  which  would  limit  or  end  the  satellite  opmtional  life  if 
problons  occur.  The  power  can  be  stored  in  eitha*  battery  since  each  can  operate  the 
satellite  individually  if  need  be.  There  wiU  also  be  two  Digital  Control  Systems  (DCS), 
multiplexers,  mass  storage  units,  transmitt^,  and  radio  frequency  sections.  There  is  only 
one  antoina  system,  which  is  another  area  of  single  point  failure. 


Hgure  7-1,  Satellite  Configuration  Block  Diagram 


The  satellite  configuration  will  be  a  m^or  aid  in  detomining  satellite  problems.  All 
nu^  sub^stems  can  be  switdied  to  isolate  fiuilty  boards.  If  any  fruit  is  detected  that 
cannot  be  corrected,  or  adjusted,  then  the  system  can  be  switched.  Evoi  the  DCS  can  be 
switched  without  losing  the  telemetry  file  in  the  mass  storage  unit,  so  the  ground  can 
verify  the  satellite's  dedsion.  The  ground  station  will  have  very  little  control  over  board 
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VIII.  CLIPS  TELEMETRY  ANALYSIS  RULE  SET 


The  CLIPS  nile  set  for  analyzing  the  telemetiy  file  can  be  divided  into  four 
eateries  of  rules.  The  first  set  of  rules  reads  all  files  that  the  program  uses,  and  changes 
the  data  into  asserted  facts.  The  second  set  of  rules  does  limit  checking  on  the  telemetry 
values,  while  the  third  set  is  the  operadonal  rules  at  determine  if  the  satellite  is  property 
operating.  The  last  set  of  rules  writes  all  knowledge  about  the  facts  imo  output  files, 
whidi  can  then  be  read  by  other  routines  and  displayed  to  the  user. 

The  first  set  of  rules  currently  reads  in  three  files.  The  first  two  are  the  stored 
telemetry  file,  and  the  current  telemetry  file.  These  two  files  are  exactly  the  same  in 
format,  the  only  difiference  is  that  the  stored  tdemetry  file  contains  all  data  recorded  since 
the  last  telemetry  download,  so  there  is  significantly  more  data  than  in  the  currait 
telemetfy  file,  which  only  contains  the  most  recent  tdemetry  reading.  The  fisrmat  of  the 
telenieCty  needs  to  be  converted  fipom  the  binary  format  that  it  comes  fix>m  the  satdlite  into 
an  ASen  data  file  that  the  CUPS  software  can  interpret.  Each  tdemetry  reading  will  be 
divided  into  sets  of  data.  The  first  line  in  the  tdonetry  set  must  be  the  time  tag  fi>r  the 
fiidlowing  data.  All  other  data  can  be  in  aiiy  order  and  the  rules  will  still  work  prt^^etly, 
which  is  one  ofthe  advantages  of  AI.  All  lines  must  also  be  in  a  format  that  the  program 
can  read  in  logically.  The  first  fidd  is  the  tdonetry  point  name.  The  second  fidd  is  the 
number  (tfdata  values  that  this  tdemetry  point  has.  The  rest  ofthe  line  is  the  data  pt^ 
assodated  with  that  tdemetry  point.  The  number  of  data  readings  must  equal  the  second 
field,  or  file  program  will  not  work  {Moperly.  Each  fidd  and  data  point  is  sqiarated  by  a 
space.  The  first  couple  of  lines  of  a  tdemetry  file  may  be  as  follows. 

time  141564 
batcur2  10  10 
cdlcur  1  0 

cefi  17  25  30  25  25  30  -25  -17  -30  25  25  80  125  25  30  25  25  30 
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The  first  line  is  the  time  ti^.  There  is  only  one  time,  so  the  next  field  is  T, 
followed  by  the  time  the  telemetry  was  read.  There  are  two  battery  current  reading so 
after  the  telemetry  pc^t  luune  ”batcur”  is  a  ”2",  followed  by  the  two  measurements.  The 
same  fisrmat  continues  through  the  file.  When  a  data  point  is  read,  it  is  asserted  as  (tel 
subsystem  sensor_number  value  time),  which  is  used  by  all  otho'  rules. 

The  second  file  to  be  read  is  the  configuration  file.  This  file  contains  the 
configuration  that  the  ground  station  thinks  the  satellite  is  in.  This  file's  format  is  as 
follows. 

rxset  1 
txset2 
modeset  1 
attenset4 
dcsset  1 
verset4 

The  ftmnat  for  this  file  is  simply  the  subsystem,  and  the  one  operating.  This  file  may 
be  in  ally  order,  as  long  as  each  line  follows  the  same  format.  Upon  launch,  this  file  will 
be  in  the  definilt  configuration  which  the  siddfite  should  power  up  in.  Whenever  the 
spacecraft  is  ctmimanded  to  change  subsystems,  this  file  will  be  updated  to  reflect  the 
commanded  change. 

The  satdfite  will  have  two  more  files  that  have  not  yet  been  fiiUy  defined.  The  first 
is  the  Event  Logger  File.  This  file  wiU  contain  the  information  that  the  satdlite  dedded  is 
pertinent  as  an  anmnalous  event  which  requires  action.  The  commands  that  the  satellite 
has  received  or  decided  itself  and  executed  will  be  stored  in  the  Command  Logger  Rle. 
When  the  parameters  fix>m  this  file  are  compared  with  the  telemetry,  the  software  will 
decide  if  there  has  been  a  chai^  in  configuration,  and  then  detmndne  if  it  agrees  with  the 
satellites  decisions  through  analysis  of  the  telemetry.  There  will  be  two  more  routines 
developed  to  read  in  the  event  logger  and  the  command  log  when  the  two  systons  are 
better  defined. 

The  limit  checking  routines  determine  if  the  telemdiy  values  are  outside  of  the 
expected  operatii^  raises.  If  a  point  does  fie  outade  of  the  expected  parameters,  then  the 


rules  will  make  assertions  concerning  the  fisct,  offisr  corrective  action,  and  detmnine  the 
telemetry  color  that  should  be  displayed  to  the  user.  The  rules  take  the  worst  case,  and 
only  present  those  color  schemes  to  the  user  at  the  top  level.  The  format  for  an  out  of 
limit  reading  is  (pt  subsystem  sensor_number  problem  time).  The  decisions  are  stored  as 
facts  in  (dec  decision_made)  format.  These  rules  also  assot  the  telonetry  subsystem 
colors  as  (color  sub^em  sensor_number  red_or_yellow)  and  (color  category 
red_or_yellow).  As  rules  are  added,  using  these  formats  will  nuke  them  compatible  with 
the  rest  of  the  rule  set. 

The  next  set  of  rules  check  on  the  operations  of  the  satellite.  These  include 
determining  when  in  the  orbh  a  point  first  wait  out  of  limits.  Another  possibility  is  that  a 
telemetry  point  is  going  out  of  limits  not  constantly,  but  during  each  orbit.  The 
temperatures  and  voltages  fiuctuate  depending  upon  the  time  in  the  sun.  The  analysis 
routines  look  for  the  first  time  a  limit  is  exceeded  per  orbit,  and  can  determine  if  the  point 
is  staying  out  of  limits  at  all  times.  Other  rules  detomine  tlw  highest  and  lowest  values  of 
each  point  in  the  telemetry  file  for  output  to  the  user,  and  check  on  system  operations. 

This  should  give  the  user  an  idea  ofthe  long  term  trends  ofthesatdlite  data.  Evoithough 
the  data  points  may  not  be  breaking  aiiy  limits,  by  looking  at  only  the  highest  value  per 
orbit,  one  can  tell  of  the  trend  is  increasing  such  that  at  some  time  in  the  fiiture,  it  will 
exceed  one  ofthe  limits.  Ifthe  data  is  assunud  to  be  increasing  at  a  linear  rate,  then  the 
slope  of  the  line  can  predict  whoi  the  satdlite  may  exceed  its  limits.  On  the  other  hand,  if 
the  long  term  trend  is  that  the  high  values  are  sta^ng  constant  or  decreasit^  then  there  is 
little  likelihood  that  the  limits  will  be  exceeded.  The  rules  check  on  the  power  system 
margin  to  detomine  if  battery  power  is  supplementing  the  solar  cdls  during  sunlight. 

These  rules  are  still  under  devdopment  and  are  an  area  where  much  more  can  be  added. 

As  the  system  gets  more  fully  defined  and  tested,  more  operational  rules  can  be  written  to 
analyze  tdemetry. 

The  last  set  of  rules  write  all  conclusions  to  files  so  that  the  infisrmation  may  be 
presented  to  the  user.  The  first  files  ate  tl»  color  files.  All  colors  are  assumed  to  be  green 
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unless  infonnation  in  these  files  change  their  state  to  yellow  or  red.  The  first  file  is  the 
"colorsys.dat”  file  which  contains  the  color  scheme  for  the  top  level  categories  of 
tdem^ry  points.  The  file  format  is 

temp  red 
power  red 

After  analysis  is  complete,  this  infonnation  is  read  and  applied  to  the  telemetry  color 
sch(»ne  for  usn*  display. 

The  second  color  file  is  "colors.dat",  which  contains  the  color  scheme  for  each 
particular  telemetry  point  that  went  out  of  range.  The  format  for  this  file  is 

rxtemp2red 
cell  12  yellow 
batcur  2  red 

This  file  is  also  read  after  analysis  by  the  telemetry  display  routines,  so  that  the  user 
has  a  quick  indication  of  problems  in  the  telemetry  information. 

The  last  telemetry  file  is  the  "tddata.dat"  file.  This  file  contains  all  pertinent 
information  about  each  data  point  as  the  s^em  determined  fi-om  the  telemetry  file.  This 
indudes  the  highest  and  lowest  values  found,  the  latest  vdue,  and  the  number  of  times  that 
the  tdemetry  point  was  outside  of  normal  operadog  parameters.  Each  data  point  has  its 
own  significance.  The  highest  and  lowest  vdues  gives  the  user  an  idea  of  how  dose  the 
tdemetry  point  may  be  to  its  limits,  or  how  fiir  it  exceeded  them.  The  counter  gives  an 
idea  as  to  how  often  the  point  was  out  of  limits.  If  the  number  is  very  low,  it  may  have 
been  a  sii^e  event  upset,  or  some  inconsequ^ifial  event.  A  hig^  count  rate  would  aim 
the  user  that  the  system  has  exceeded  the  limits,  and  action  needs  to  be  taken.  The  order 
of  the  points  is  pre^etmnined,  so  a  procedural  di^lay  algorithm  will  be  easy  to 
inqrlement. 

There  are  also  outputs  that  are  appended  to  previous  data  that  can  aid  the  user  in 
determiniiig  the  current  state,  and  trends.  The  first  is  "lifevd.dat”  which  is  the  lifetime 
values  for  each  point.  This  file  contains  every  reading  of  each  telemetry  point  and 
associated  time  tag.  This  file  is  in  a  space  deliminated  file  format  that  can  be  easily 
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imported  into  a  spread  sheet  or  plotting  routine  for  analysis.  The  nmct  two  files  look  at 
poiodic  characteristics.  The  rules  determine  the  high  and  low  value  per  orbit,  and  write 
those  to  "hivals.dat"  and  "lovals.dat".  These  two  files  strip  away  the  transient  readings 
and  can  aid  in  determining  if  the  long  term  trends  are  getting  closer  to  the  limits,  and  if  a 
prediction  can  be  made  as  to  when  these  points  may  exceed  their  operating  limits.  This 
will  make  specific  trends  much  easier  to  notice.  If  certain  components  are  getting  hotter 
over  a  poriod  of  time,  then  the  highest  point  pa*  orbit  will  quickly  point  this  out,  while  the 
constant  temperature  fluctuations  that  occur  every  orbit  nuy  obscure  the  long  term  trends. 

The  last  file  to  be  written  are  the  conclusions  that  the  program  reached.  The  first  is 
problems  in  the  telemetry  asserted  in  the  limit  checking  and  system  op^tion  routines. 

The  "prob.dat"  file  contains  all  systems  and  readings  that  are  not  correct.  The  last  file  is 
the  dedsiofis  file,  "dec.dat"  which  contains  all  of  the  decisions  reached  by  the  expert 
^tem.  A  much  more  in  depth  written  explanation  of  each  rule  and  a  rule 
interdependency  matrix  can  be  found  in  Appendix  A.  Appendix  B  contains  the  code 
devdoped  so  fiu:  in  this  project,  which  is  not  in  its  final  form. 
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IX.  GROUND  STATION  SOFTWARE  DESIGN 


A.  REQUIREMENTS 

The  PANSAT  Ground  Station  will  be  responsible  for  all  tasks  that  will  be  associated 
with  the  daily  operations  of  the  satellite,  as  well  as  the  primary  contingency  station  in  case 
unforeseen  circumstances  require  special  commanding  from  the  ground.  The  ground 
station  will  be  used  by  the  Space  Systems  Academic  Group,  as  well  as  students  at  the 
Naval  Post  Graduate  School.  The  use  of  the  system  by  imtrained  students  requires  that 
the  user  interface  with  the  satellite  be  as  simple  to  undo’stand  as  possible  without  losing 
any  of  the  capabilities  required  to  effectively  operate  the  satellite. 

The  ground  station  needs  to  have  the  capability  to  do  several  different  operations  in 
order  to  maintain  the  satellite  system.  First  of  all,  the  ground  station  wiU  have  to  be  able 
to  track  the  satellite.  This  will  require  the  station  to  have  an  accurate  internal  clock,  and 
the  ability  to  update  it  from  an  accurate  source.  The  ground  station  also  requires  up  to 
date  ephemeris  infiirmation  on  the  satdlite.  Once  the  station  knows  the  position  of  the 
satdlite,  and  its  prechcted  nse  and  set  times,  the  station  must  then  be  able  to  control  the 
antenna  so  that  communications  can  be  established. 

Once  the  computer  determines  the  satellite  is  in  sight,  then  it  must  be  able  to 
establish  a  ctmununications  link.  Since  the  satellite  will  be  in  a  receive  only  mode,  the 
ground  computer  will  have  to  initiate  the  communications  link.  Once  the  link  has  bem 
established,  then  the  ground  station  must  be  able  to  transmit  information,  both  commands 
and  files,  to  the  spacecraft,  and  receive  information  from  the  spacecraft.  This  information 
must  also  be  displayed  to  the  user  in  a  logical  manner,  so  that  it  can  be  quickly  interpreted. 
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R  GROUND  STATION  DESIGN 

The  ground  station  will  use  one  computer  for  controlling  the  antenna  with  a  Kansas 
City  Tracker.  With  one  computer  responsible  for  antenna  pointing  and  satellite  tracking, 
the  user  will  be  able  to  also  display  the  satellite's  current  location,  so  the  position  of  the 
antenna  can  be  verified.  The  satellite's  ephemeris  will  be  updated  via  modem  with  data 
from  t'-  o  NPS  amateur  radio  club  bulletin  board.  The  internal  clock  can  also  be  updated 
by  modem  or  radio  to  ensure  accurate  tracking. 

A  second  computer  has  the  satellite  communications  software  as  diagrammed  in 
Figure  9-1.  This  program  is  menu  driven  to  quicken  and  simplify  use.  The  spacecraft 
operations  are  separated  into  three  distinct  phases.  During  the  first  phase  the  user  sets  up 
the  ground  station  to  prepare  for  the  next  satellite  pass.  The  second  phase  is  when  the 
satellite  is  in  view,  and  the  ground  station  is  communicating.  The  last  phase  is  the  post 
processing  routines. 
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Rgure  9-1 .  Top  Level  Ground  Station  Software  Block  Diagram 


All  of  the  commands  peiformed  in  the  pre-pass  phase  can  also  be  performed  durii^ 
the  satellite  pass,  but  the  limited  time  the  satellite  is  in  view  discourages  this  use.  Upon 
starting  the  ground  software,  it  first  sets  up  the  display  menus  so  that  the  user  can  begin 
operations.  The  modem  and  terminal  node  controUer  (TNG)  are  setup  with  configuration 
files.  The  user  can  edit  a  script  for  use  on  file  next  pass.  It  is  written  in  a  ASCII  based 
text  editor,  and  thoi  compiled  to  ensure  that  all  commands  are  imderstood  and  verified. 
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Files  are  also  selected  for  transfer.  The  program  automatically  checks  those  selected  for 
PANSAT  file  headers.  If  there  is  not  one,  the  user  is  queried  to  supply  the  needed 
information.  Once  a  script  is  selected,  and  the  files  are  processed  for  transfer,  the  ground 
station  is  ready  to  connect  to  the  spacecraft.  A  default  script  can  also  be  used  so  not 
every  pass  will  have  to  be  monitored  by  ground  personnel. 

Once  the  ground  station  is  in  contact  with  the  satellite,  it  will  send  a  connect  packet 
and  establish  a  communication  link.  The  ground  station  and  satellite  conclude  the 
operations  that  were  being  performed  the  last  time  the  satellite  was  in  view.  If  the  satellite 
had  not  yet  completely  downloaded  a  file,  then  the  ground  station  will  request  to  satellite 
to  fill  the  holes  in  the  partially  downloaded  files.  Similarly,  the  ground  station  request  and 
continues  to  upload  any  files  that  were  only  partially  uploaded  on  the  previous  pass.  Once 
these  operations  are  completed,  the  script  can  be  executed,  or  the  user  can  send 
commands  as  he  wants.  For  every  pass,  the  ground  station  should  at  least  perform  all 
necessary  functions  to  check  on  the  'health'  of  the  satellite,  and  download  or  upload  any 
messages. 

Once  the  tdemetry  is  downloaded,  it  is  automatically  sent  to  the  CLIPS  subroutines 
to  determine  the  satellite  state.  The  telenaetry  file  is  translated  into  format  so  the  Artifidal 
Intelligoice  routines  can  quickly  access  the  information,  search  for  conclusions  fi-om  the 
data,  and  output  its  analysis  to  the  user.  Once  the  analysis  is  complete,  the  problems  and 
decisions,  as  well  as  telemetry  information  can  be  accessed  fi-om  the  main  menu,  and 
displayed  in  a  color  coded  windows  format.  The  color  coded  tdemetry  cat^ories  will 
quickly  cue  the  user  to  any  problems  in  the  satellite.  A  green  indication  signifies  that  the 
parameter  is  within  its  normal  range  for  all  operations.  A  ydlow  tdemetry  point  indicates 
that  an  anomalous  value  that  exceeded  the  normal  operating  range  of  the  satellite,  and 
could  eventually  impact  the  satellite's  operation.  A  red  indication  means  that  a  telemetry 
point  has  exceeded  a  critical  threshold.  The  occurrence  had  endango^  the  spacecraft, 
and  interferes  with  proper  operation.  Corrective  action  must  be  taken  immediatdy,  if  not 
already  performed  by  the  autonomous  nature  of  the  satellite.  The  ground  station  will  have 
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pull  down  menus  to  access  the  subcategories  telonetry  points  as  shown  in  Figure  9-2. 
Only  the  master  ground  station  will  have  the  ability  to  receive  all  telemetry  files.  Civilian 


Figure  9-2,  Main  Page  Layout 

users  will  only  be  able  to  download  the  currait  telemetry  file.  The  satellite  telonetry  will 
be  divided  into  cat^oiies  and  delayed  as  TEMPERATURE,  POWER,  SCOS,  and  BAX. 

a  user  wants  amplifying  information  on  a  particular  system,  he  will  click  the  mouse 
on  the  miyor  category,  and  the  tdemetry  will  be  displayed  in  a  window,  with  the 
description  and  color  coded  limits  as  illustrated  in  Figure  9-3.  Any  telemetry  point  can  be 
selected  for  display  by  clicking  the  mouse  on  subsystem,  which  will  bring  up  another 


so 


Figure  9-3,  Telemetry  Subsystem  Display  with  Selected  Telemetry  Point 


window  that  identifies  the  parameter,  its  latest  value,  high  and  low  values,  the  limits,  and 

the  number  of  times  the  point  has  &iled  that  criteria. 

Another  section  of  the  main  screoi  will  display  the  raw  communications  that  are 
going  on  with  the  satellite  and  will  show  the  commands  that  are  being  sent  and  received  by 
the  satellite.  The  visual  cue  of  the  satellite  link  wiU  also  insure  the  proper  operation  of  the 
autonuited  software. 

By  sdecting  a  menu  option,  the  user  will  be  able  to  send  conunands  to  the  satellite. 
The  commands  are  divided  and  accessed  in  three  categories.  Super  Us^  commands, 
general  commands,  and  ground  commands,  shown  in  Figure  9-4.  The  super  user 
commands  are  those  that  affect  the  configuration  of  the  satellite.  While  goieral  commands 
are  other  functions  the  ground  station  can  have  the  satellite  perform,  but  they  do  not  alter 
the  sateUite.  Ndther  of  these  categories  are  available  to  the  civilian  user.  The  last  set  of 


commands  are  the  ground  commands.  These  are  the  file  transfer  and  mail  commands  that 


aU  civilian  users  will  be  able  to  use. 
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Figure  9-4,  Satellite  Commanding  Menus  Layout 
During  the  post  pass  phase,  the  data  fiom  the  recent  and  past  passes  can  be  huther 
analyzed,  and  stored.  The  data  is  also  arctuved  on  a  regular  ba^. 


The  other  type  of  ground  station  will  be  designed  for  the  civilian  user.  He  can  use 
either  software  oflfisred  by  NFS,  or  may  be  able  to  use  others  commercially  available  that 
inqslement  PACSAT  FTLO  if  the  NFS  version  is  compatible.  These  packages  will  not 
have  the  passwords  needed  to  access  the  stored  tdemetiy,  or  send  commands  to  the 


qncecraft.  It  will  allow  the  amateur  fiill  access  to  transfer  files  in  the  store  and  forward 


capability.  The  satellite  will  also  have  recaittdemetryft>r  those  wishing  to  download  that 
infimnation.  The  spread  spectrum  transmitta’ will  also  be  required.  A  kit  wUl  be  available 
either  through  NFS,  or  a  cmUan  company.  Wifii  eaaly  available  software  and  hardware, 
the  FANSAT  should  have  numerous  customs  wanting  to  use  its  services. 


C.  FILE  TRANSFER 

When  a  file  is  to  be  transmitted  to  or  firom  the  satellite,  the  File  Transfer  Level  0 
(FTLO)  communication  protocol,  as  seen  in  I^gure  9-5,  is  used.  It  was  devdoped  by  Jeff 
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Ward  and  Harold  E.  Price  to  be  used  on  Pacsat.  When  a  FTLO  packet  is  transmitted  to 
the  spacecraft,  it  has  an  information  field  of  0  to  2047  bytes,  and  a  two  byte  header  that 
indicates  the  number  of  bytes  in  the  information  field  and  the  packet  type.  The  type  of 
information  field  uses  binary  0  to  3 1,  except  for  18-29,  to  call  subroutines  onboard  the 
satellite.  The  following  information  field  can  then  be  used  by  the  satellite  operating 
system.(Ref.  17) 
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Figure  9-S,  File  Transfo*  Block  Diagram 


D.  ADD  PANSAT  FILE  HEADER 

The  file  header  added  onto  the  fix>nt  of  evoy  file  transmitted  to  the  spaceoaft  carries 
pertinent  infiyimation  for  the  satdlite  to  properly  carry  out  its  functions.  The  file  header 
consists  of  sev^  fields,  of  which  only  a  few  are  supplied  by  the  user.  When  the  user 
sdects  a  file  for  upload,  the  ground  station  executes  the  file  header  routine  on  the  file 
sdected.  The  program  prompts  the  usct  for  file  type  and  compression  used.  It  then 
(pieries  the  user  for  the  destination  callsigns.  The  last  step  is  for  the  vaei  to  supply  the 
tide  of  his  message,  and  keywords  so  others  can  dedde  if  th^  would  like  to  download 
that  file.  Once  the  informadon  is  aipplied,  is  it  appended  onto  the  fi'ont  of  the  file  along 
with  otho-  informadon  added  by  the  computer.  The  computer  added  fields  include  flag, 
length  of  file,  source,  priority,  mail  name  and  extenrion,  number  of  destinadons,  dde 
length,  key  words  length,  and  clracksums  for  the  header  and  body. 
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When  the  ground  station  is  linked  to  the  satellite  and  requests  to  send  a  mail  file,  the 
computer  first  checks  the  PANSAT  file  header  for  validity.  It  then  sends  the  upload 
request  to  the  satellite  along  with  the  total  size  of  the  file.  The  satellite  then  determines  if 
there  is  room  in  the  mailbox  for  that  size  of  a  file.  If  so,  it  sends  the  ground  station  a 
numbo’  whidi  is  then  used  to  identify  the  message.  With  this  message  number,  the  ground 
station  can  then  upload  the  file.  Once  the  message  is  received  by  the  satellite,  it  puts 
additional  infisrmation  into  the  header.  This  includes  body  ofi&et,  download  count,  upload 
time,  expire  time,  and  updates  the  header  checksum.  When  the  ground  station  downloads 
a  file,  the  computer  will  then  strip  the  file  of  the  PANSAT  file  header  and  save  it  on  the 
harddisk. 

E.  TELEMETRY  SUBSYSTEM 

The  telemetry  system  will  have  several  difiment  phases  before  it  can  be  analyzed  by 
the  ground  station  user.  The  satellite  distal  control  syston  will  control  multiplexers 
which  are  connected  to  A/D  converters  wUch  read  the  various  temperature,  voltage,  and 
current  probes  throughout  the  ^Micecraft.  These  values  will  be  read  into  memory  as  a 
hexadedmal,  unsigned  value.  The  diflferait  sensors  can  be  polled  at  dififoent  rates  which 
can  be  set  fix)m  the  ground,  depending  tqwn  the  demands  of  the  subsystems  that  require 
the  infi>imation.  The  polling  will  also  be  conducted  at  regular  intervals,  and  stored  into  a 
file.  The  format  ofthe  file  will  have  the  time  that  the  sanq)le  was  taken  at,  followed  by 
the  value  of  each  telem^ry  point  in  order.  This  file  will  be  binary  and  must  be  interpreted 
by  the  ground  station.  This  file  can  then  be  transmitted  to  the  ground  station  over  the 
oommunicatimis  link  just  as  any  othw  file  would  be  transmitted.  The  satellite  also  keeps  in 
memory  the  latest  telemetry  points  taken,  and  these  too  can  be  transmitted  down  to  the 
user.  The  files  wiU  ha\>y  a  PANSAT  file  header  added  to  the  b^inning  before 
transmission,  so  that  the  ground  station  wiU  know  that  the  file  contains  tdem^ry 
infimnation,  and  udiere  the  information  is  located.  Once  the  ground  station  receives  the 
tdemetiy  file,  each  data  point  needs  to  be  converted  into  a  measured  value  according  to 
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the  equations  that  govern  the  sensors.  The  data  is  then  used  in  the  A.I.  software  so  that 
vital  statistics  can  be  detmnined  and  presoited  to  the  user. 

Once  the  ground  station  has  converted  the  raw  data  into  a  usable  format,  the 
PANSAT  tdemetry  analysis  tool  can  then  be  used  to  print  problems  and  solutions  to  the 
screen,  or  to  a  file.  From  the  analysis,  th«e  can  be  several  different  types  of 
recommemlations.  The  first  type  is  that  the  user  can  then  command  the  spacecraft  to 
reconfigure  the  satellite  to  operate  in  a  mode  that  is  unaffected  by  the  subsystem  that  is 
giving  the  bad  telemetry.  Another  possibility  is  that  the  operations  of  the  satellite  can  be 
changed  so  that  it  is  less  affected  by  the  tdem^iy  poims  exceeding  limits.  The  last 
possibilities  are  that  the  problem  cannot  be  overcome,  and  the  user  can  only  monitor  the 
situation,  or  the  exceedance  is  the  actual  operational  limits  of  the  spacecraft,  and  the  limits 
should  be  changed  to  accommodate. 
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X.  SPACECRAFT  COMMANDING 


One  most  important  aspect  of  the  ground  station  will  be  the  ability  to  send 
commands  to  the  spacecraft  that  can  affect  tlw  configuration  and  operations,  as  well  as 
perform  trivial  housekeeping  functions.  For  most  subsystem  functions,  the  software 
onboard  the  spacecraft  must  be  able  to  autonoiiKMisly  operate  the  spacecraft.  If  situations 
arise  where  an  action  must  be  perfisrmed  or  risk  the  loss  of  the  satellite,  then  the  vehicle 
itself  must  be  able  to  determine  any  action  to  be  performed,  and  command  itsdf  These 
events  are  and  decisions  are  stored  in  the  spacecraft's  event  log,  which  can  be  downloaded 
and  verified  for  proper  operation. 

A  problem  arises  that  not  all  situations  can  be  predicted,  so  not  aU  solutions  can  be 
known  beftnehand.  To  aid  in  this  situation,  the  ground  station  must  be  able  to  command 
the  t^Mcecraft  with  idl  of  the  same  commands  that  the  spacecraft  has  as  its  own 
capabUhtes.  The  abffity  to  command  the  spacecraft  will  also  aid  in  troubleshooting  the 
spacecraft  and  determine  possible  malfiinctions  in  the  system.  The  ground  station  will  also 
be  aUe  to  command  the  satdlhe  to  use  different  sul»ystems  to  insure  that  the  redundam 
^sterns  are  still  operational  if  desired. 

There  win  be  several  (fiflfetent  sets  of  commands  that  will  be  used.  The  first  set  wiU 
be  those  that  can  be  used  by  all  users;  the  NFS  ground  statimi,  and  the  civilian  users. 

These  win  be  the  basic  commands  to  read  mail,  send  mail,  and  download  recent  telemetry. 
These  commands  wiU  be  wUl  conqtly  with  already  cdsting  FTLO  formats  in  wide  use  by 
amateur  sateffites.  The  tmly  difference  win  be  in  the  stations' program  to  put  the  proper 
PANSAT  file  headm’  information  onto  the  fiont  of  the  file.  Currently,  the  PACSAT  file 
header  jmftocoi  adds  extra  unneeded  information  that  the  PANSAT  file  header  wUl  omit. 
This  primary  reason  is  to  shorten  the  overan  file  length. 

The  next  sets  of  commands  win  be  those  that  only  the  main  ground  station  can 
execute.  These  wOl  be  broken  into  two  categmks.  The  first  wOl  be  general  housekeqmig 
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commands.  These  will  include  the  ability  to  purge  mail,  add  or  delete  bulletins,  download 
recent  and  stored  telemetry,  and  other  trivial  tasks. 

The  last  set  of  commands  will  be  those  that  alter  the  configuration  of  the  spacecraft, 
or  command  it  to  perform  certain  functions.  These  commands  are  Imown  as  Super  User 
Commands,  and  will  only  be  executed  by  authorized  personnel.  These  commands  include 
the  ability  to  switch  processors,  DCS's,  batteries,  and  load  software.  These  commands 
can  be  used  only  if  the  correct  password  is  used,  and  the  computer  will  verify  with  the 
user  that  these  commands  are  ^^lat  the  user  wants  to  perform.  These  commands  will  also 
be  executed  in  hexadecimal  format.  An  advantage  to  this  cq)ability  is  that  unauthorized 
users  will  be  less  likely  to  decode  the  commands  that  can  manipulate  the  spacecraft  in 
ways  that  we  don't  want  them  to  be  able. 

There  ate  several  steps  in  sending  a  command  to  the  spacecraft,  diagrammed  in 
Figure  10-1.  When  a  command  is  sdected,  the  computer  verifies  with  the  user  that  it  is 
the  proper  ctmunand.  The  next  step  is  to  send  the  packet  to  the  ground-based  spacecraft 
sunulator.  This  is  an  operational  mockup  of  the  satellite,  which  is  in  the  same 
configuraticHi  as  the  ground  station  expects  the  satellite  to  be  in.  The  ground  nmulator 
echoes  back  die  command,  then  executes  it.  The  ground  station  then  verifies  that  the 
simulator  echoed  back  the  proper  command,  and  executed  it  correctly.  Once  all  of  these 
steps  have  been  successfully  accomplished,  then  the  command  can  be  sent  to  the 


Figure  10-1,  Spacecraft  Commanding  Block  Diagram 
In  order  to  send  a  command  to  the  satdihe,  it  must  be  sent  to  a  particular  triplication 
on  the  ^Mcecraft.  The  FTLO  protocol  sends  its  inftirmation  packets  to  PANSAT-1  where 
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-I  indicates  tlw  subsyston  idoitification  (SSID)  which  is  application  address  on  the 

satdlite  used  by  BAX.  The  conunands  to  tlw  satellite  will  be  soit  to  PANSAT-2,  which  is 

the  application  for  interpreting  commands.  The  information  sent  to  the  command 

interpretation  routine  includes  a  one  byte  header  that  tells  the  satellite  how  large  the 

packet  is.  Each  command  uses  two  bytes,  the  modifiers  use  one  byte,  and  callagns  use  12 

bytes.  The  hugest  size  for  the  command  set  is  1 5  bytes,  so  only  one  byte  is  needed  to 

count  total  number  of  bytes  in  the  command.  A  packet  for  a  ground  control  command  like 

READ  CUR  TEL  would  then  be  20B  or  in  binary, 

count  command 
0002  00001011 

Similarly,  a  packet  for  a  subsystem  command  DISCH  BATT  \A  would  be  341  or  in  binary 

count  command  nuxlifier 
0011  OOllOlOO  0001 

ifthe  satellite  receives  a  subsystem  command,  it  first  checks  that  the  user  has 
already  sent  the  SUPER  command  with  proper  password.  If  not,  the  satellite  responds 
with  an  error  message.  Ifthe  command  is  valid,  it  transmits  the  interpreted  command  and 
wuts  for  verification  fiom  the  ground  station.  Once  the  satellite  receives  verification  on 
the  command  that  it  interpreted,  then  it  will  execute  the  command,  and  transmit 
cmupliance.  The  list  of  commands  is  in  Appmidix  C,  while  the  binary  formats  are  not 
included  to  keq)  the  distribution  of  this  thesis  unlimited. 
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XI.  CONCLUSIONS  AND  FURTHER  STUDY 


The  automatic  analysis  of  telemetry  saves  the  ground  station  operator  from  the 
monotonous  task  of  sorting  through  and  analyzing  the  vast  amounts  of  telemetry  that  are 
received  from  the  satellite.  By  storing  the  project  engineers'  knowledge,  the  ability  for 
inexperienced  users  to  understand  the  health  of  the  satellite  is  dramatically  improved. 
PANSAT  also  has  many  students  who  work  on  the  project  and  leave,  and  project 
engineers  who  will  move  onto  other  projects  once  the  satellite  becomes  operational.  The 
ability  to  retain  the  corporate  knowledge  is  essential  in  providing  continuity  in  the 
program. 

From  this  point,  there  is  still  much  work  to  be  accomplished.  The  satellite  is 
entering  the  testing  phase,  where  the  operational  limits  and  procedures  become  more 
defined.  As  this  happens,  rules  can  be  added  to  the  knowledge  base  to  keep  the  AI. 
portion  up  to  data  with  the  actual  configuration  of  the  satellite.  The  coding  for  the  ground 
station  software  can  also  begin  as  the  inter&ce  between  the  comroUers  and  satellite  are 
tested.  The  AI.  code  also  needs  to  be  imbedded  m  the  C  procedural  code,  where 
s^nificant  changes  can  occur.  Instead  of  writing  all  decisions  and  problems  to  file,  they 
can  be  presented  to  the  us^  as  soon  as  they  are  discovered  through  subroutines  called  by 
the  rule  set.  As  the  program  stands,  it  asks  the  user  for  the  name  of  the  telemetry  file.  In 
the  final  form,  there  are  two  dififerrait  versions  of  the  rule  set.  One  wiU  have  the  full 
capalnlities,  including  the  ability  to  append  data  to  the  lifetime  and  high  and  low  values 
data  files.  This  rule  set  wUl  be  used  automatically  when  the  ground  station  receives  a  new 
tdemetry  file  fiom  the  spacecraft.  The  interface  is  automatic,  and  not  seen  by  the  user. 
Another  version  of  the  rule  set  is  used  to  aiudyze  past  data  sets.  This  rule  set  does  not 
have  the  aitilhy  to  appoid  data  to  existing  files,  which  would  corrupt  the  data  files  by 
doubling  old  data  out  of  sequence. 
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APPENDIX  A. 


Explanation  of  rules  for  PANSAT  tdemetiy  analysis 

The  following  paragraphs  are  quick  ejqjlanations  of  each  rule  in  the  rule  set.  The 
number  of  each  rule  is  used  in  following  matrices  of  rule  interdependence.  The  program 
can  be  run  other  in  a  windows  environment,  or  DOS.  After  entering  the  operating 
environment,  the  user  must  type  (load  prog.clp)  to  load  the  constructs  into  memory.  A 
(reso)  must  be  commanded  next,  which  clear  the  facts  and  asserts  (initial-foa),  which 
must  coast  for  the  program  to  execute.  The  program  can  then  be  executed  with  a  (run) 
command.  The  program  asks  for  a  file  name  that  contains  the  telemetry  data,  "data.clp" 
has  data  to  test  the  program.  Upon  completion,  all  files  are  closed  with  a  (close) 
command  so  that  other  applications  can  access  those  files. 

1.  defi^lle  open-file 

This  operation  is  performed  first  because  of  the  initial-fact  which  is  automatically 
asserted  with  a  (reset)  command.  The  rule  then  asks  the  user  for  the  file  name  that 
contains  the  telemetry  data.  In  the  final  form,  then  tdemetry  file  will  be  included,  and  the 
input  will  be  transparoit  to  the  user.  The  file  is  then  found  and  opened.  The  name  of  the 
file  is  saved  for  later  use,  and  the  initial-fact  is  removed  so  that  the  rule  wiU  not  fire  again. 
The  rule  also  opens  the  output  files,  so  that  other  rules  may  write  or  iq)paid  data  to  them. 
Several  facts  are  asserted  to  initiate  the  opo^on  of  several  other  rules. 

2.  d^ule  read_parameter 

Here,  the  rule  makes  sure  the  file  containing  the  current  configuration  file  is  open, 
and  ready  to  be  read  which  is  asserted  by  either  the  open-file,  or  read_setting.  It  then 
reads  the  data  of  the  configuration  system  and  retracts  the  facts  that  fired  the  rule. 

3.  defiule  read_setting 
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If  the  configuration  file  is  open,  and  the  subsystem  name  has  been  read  by 
read  j7arameter,  and  it  is  not  the  end  of  file  marker,  then  the  rule  reads  in  the  subsystem 
selected,  saves  the  information,  and  deletes  the  fact  that  fired  the  rule. 

4.  defiule  eof_setting 

If  the  configuration  file  is  open,  and  the  subsystem  name  has  been  read  by 
read_parameter,  and  it  is  the  end  of  file  marker,  then  the  rule  closes  the  configuration  file, 
and  retracts  the  facts  that  fired  the  rule. 

5.  defirule  read-data-header 

The  rule  checks  for  the  open  data  file  name,  and  if  the  telemetry  point  name  is  to  be 
read  by  a  fact  asserted  by  either  open-file  or  end-of-line.  The  new  telemetry  point  name  is 
then  read,  as  well  as  the  next  field  that  determines  the  number  of  those  telemetry  points. 
The  telemetry  name  is  then  stored,  along  with  the  number  of  points.  A  counter  is  then 
initialized,  and  the  &ct  that  fired  the  rule  is  retracted. 

6.  defiule  read-data 

This  is  the  only  rule  that  has  the  salience  set.  It  is  so  that  the  rule  will  only  fire  if  it  is 
the  only  rule  on  the  agenda  list.  This  is  vitally  important  to  the  operation  of  the  program. 
Since  this  rule  deletes  old  telemetry  points  each  time  it  reads  in  a  new  one,  then  is  rules  get 
under  the  read-data  rule  in  the  agenda  list,  th^  may  no  longer  be  valid  after  the  rule 
deletes  the  old  telemetry  point.  By  setting  the  salirace,  this  ensures  that  all  rules 
associated  with  each  telemetry  point  will  fire  before  that  point  is  deleted.  If  the  points 
were  not  deleted,  then  the  program  would  quickly  fill  up  the  available  RAM,  and  the 
operation  would  slow  down  immensely  as  the  data  is  stored  in  the  hard  disk. 

The  rule  checks  for  the  open  data  file  name  and  an  old  data  point.  The  next  points 
name  is  found,  and  it  is  checked  to  make  sure  that  it  is  not  an  end  of  file  marker  or  time 
tag.  The  number  of  points  is  then  found,  and  checked  against  the  counter  to  make  sure 
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that  not  all  of  the  telemetry  points  for  that  subsystem  have  been  read.  The  ne?ct  telemetry 
point  is  then  read  and  saved,  and  the  old  telemetry  point  is  deleted.  The  point  is  also 
asserted  as  the  latest  point  to  b^in  the  search  for  the  latest  value  of  each  telemetry  point. 
The  rule  also  asserts  facts  to  start  the  out_count  rule  in  determining  if  an  error  is  always 
happening.  The  counter  is  then  incremented  for  the  next  read-data  rule  firing.  The  last 
two  operations  are  to  q)pend  the  data  points  onto  the  life  time  value  file,  and  assert  a  fact 
so  that  the  limit  checking  only  occurs  once  per  telemetry  point. 

In  a  CLIPS  program,  the  inference  engine  matches  facts  to  rules,  and  only  fires  a 
rule  once  for  a  given  set  of  facts  that  matches  the  left  hand  side.  In  the  limit  checking 
rules,  a  counter  in  incremented.  Each  time  the  rule  fires,  it  deletes  the  old  counter  and 
asserts  a  new  counter.  This  new  counter  is  then  a  new  fact  that  satisfies  the  left  hand  side. 
If  another  fiu:t  fi-om  a  different  routine  were  not  asserted  here,  and  retracted  in  the  limit 
checking  rules,  then  the  limit  rule  would  continue  indefinitely,  incronenting  the  counter 
continuously,  which  puts  the  program  into  an  infinite  loop. 

7.  defiule  read-time 

The  program  checks  for  open  data  file  name,  and  finds  the  old  number  of  telemetry 
points,  counter,  time  fact,  and  time  tags.  It  fires  on  assertions  made  in  read-data-header. 
Then  the  new  time  is  read,  and  the  all  old  telemetry  syston  information  is  ddeted.  It  also 
assots  Acts  to  save  the  time  tag,  and  fire  the  read-data-header  rule.  The  rule  then  prints  a 
carriage  return  line  feed  to  the  life  time  valu^  files  to  kwp  it  in  usable  format. 

8.  defiule  end-of-line 

The  current  telemetry  name  is  found  firom  read-data-header,  and  checked  to  ensure 
the  end  of  file  has  not  been  reached.  The  total  number  of  points  and  counter  is  found  and 
compared.  If  the  counter  is  equal,  then  it  has  already  read  all  of  the  data  points,  and  the 
end  ofthe  telemetry  data  line  has  beat  reached.  Hus  causes  the  counter  and  number  of 
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points  and  system  read  to  be  deleted,  and  the  next  telemetry  data  line  can  be  read  since 
read-data-header  uses  a  fact  asserted  in  this  routine. 

9.  de&ule  end-of-file 

The  old  total  number  of  points,  counter,  and  open  data  file  name  are  found.  The 
telemetry  point  from  read-data-header  is  checked  to  see  if  the  end  of  file  marker  has  been 
read.  If  the  program  has  reached  the  end  of  the  data  file,  then  the  telemetry  information 
and  point,  open  data  file  fact  and  end  of  file  point  are  deleted,  and  the  data  file  is  closed. 

A  fact  is  asserted  that  the  file  is  now  closed  to  be  used  in  other  rules. 

10.  defiule  start_counter 

This  rule  initialized  a  counter  to  determine  the  number  of  times  that  a  telemetry  point 
is  out  of  limits.  A  telemetry  point  is  found,  and  if  a  counter  does  not  exist  yet  that  is 
associated  with  that  telemetry  point,  then  one  is  made.  This  counter  is  used  in  all  of  the 
limit  checking  rules. 

11.  defiule  savejbattery_current 

This  rtile  saves  the  battery  current  so  that  it  is  not  deleted  before  it  can  be  used  with 
the  solar  cell  current  telemetry  point.  Otherwise,  the  read-data  rule  would  ddete  the  data 
point,  and  it  could  never  be  compared. 

12.  defiule  save_ceil_current 

This  rule  is  very  similar  to  the  save_battery_current  since  the  two  need  to  be  used 
concurrent^  in  oth«’  rules. 

13.  defiule  in_sun  "Check  to  see  if  the  satellite  is  in  the  sun" 

The  solar  cell  current  is  found  and  checked  to  see  if  the  cells  are  supplying 
significant  power  to  the  spacecraft  bus.  If  it  is,  then  the  satellite  is  in  the  sun  using 
primarily  solar  power. 

14.  defiule  in_eclipse  "Check  to  see  if  the  satdlite  is  in  eclipse" 
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The  battery  curroit  is  found  and  checked  to  see  if  the  battery  is  discharging.  Then 
the  same  time  U^ed  solar  cell  current  is  found  to  see  if  it  is  supplying  significant  power. 

If  tlM  power  is  coming  fi’om  the  batteries,  then  the  satellite  is  in  eclipse  and  that  fact  is 
ass«ted  and  time  tagged. 

15.  defiule  exceedj)ower_budget 

In  tins  case,  the  battery  current  is  found,  and  tested  to  see  if  it  is  supplying  significant 
power.  A  solar  cell  current  is  also  found  and  tested  if  it  too  is  supplying  significant  power. 
If  both  of  the  power  supplies  are  giving  power  to  the  spacecraft,  then  the  satellite  must  be 
in  the  sun,  as  has  been  found  using  in_sun,  but  also,  the  requirements  of  the  spacecraft 
exceed  the  ability  of  the  solar  panels  to  supply  all  needed  power.  This  means  that  the 
spacecraft  is  operating  in  a  negative  power  budget.  This  rule  recommends  to  fully  check 
out  the  power  system,  and  contider  chan^^g  spacecraft  operational  capabilities  when  it 
finds  that  the  power  budget  has  been  exceeded. 

16.  defiule  delete_oldj)ower_&cts 

When  tte  read-data  rule  is  completed,  and  the  data  file  is  closed,  no  more  telemetry 
points  will  be  read.  This  rule  deletes  all  of  the  battery  tonperature  and  currait  points  as 
well  as  the  solar  cell  currents  that  were  saved,  since  they  will  no  longer  be  needed. 

17.  defiule  save_battayj«np 

This  rule  is  very  similar  to  the  savejbatteryjurrent  since  the  battoy  temperature 
and  voltage  need  to  be  used  concurrently  in  other  rules. 

18.  defiule  saveJbattery_yolt 

This  rule  is  the  same  as  to  the  save Jbattoyjtemp  since  the  battery  temperature  and 
vohage  need  to  be  used  concurrently  in  other  rules. 

19.  defiule  battjcharged 
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Tlus  rule  determines  if  the  batteries  are  fuUy  charged,  and  the  time  that  they  are  first 
fully  charged  in  each  orbit.  By  linearizing  the  suppliers  graph  voltage  and  temperature,  the 
equation  of  a  line  will  determine  if  the  batteries  are  at  or  above  the  voltage  threshold  for  a 
given  temperature.  If  so,  the  rule  determines  that  the  batteries  are  fiiUy  charged. 

20.  defitile  bat_temp_increase 

When  a  battery  is  fully  charged,  continued  charging  causes  the  temperature  of  the 
battery  to  increase,  since  the  energy  is  not  used  for  increasing  the  electric  potential  of  the 
battery.  This  rule  determines  how  much  the  temperature  rises  after  is  has  been  decided 
that  the  battmes  are  fully  charged.  The  fact  that  the  batteries  are  charged  is  found,  and 
the  battery  temperature  with  the  same  time  so  the  temperature  at  completed  charging 
is  known.  Another  battery  temperature  fact  is  found.  The  facts  are  thoi  tested  to  ensure 
that  the  second  temperature  occurred  within  one  orbit  after  the  first  reading,  and  the 
second  point  is  higher  than  the  first  temperature.  The  rule  thoi  finds  the  tenqierature 
change  and  saves  it  as  a  new  fact. 

21.  defiule  largest_change 

Since  there  are  sevonl  readings  after  the  batteries  are  charged,  there  will  be  several 
tonperature  differences.  This  rule  finds  two  tonperature  difference  &cts  in  the  same  orbit 
and  retracts  the  smaller  difference.  Eventually,  only  the  largest  temperature  increase  will 
remain. 

22.  defirule  latest_eclipse 

Here,  the  rule  finds  two  times  in  eclipse,  and  determines  which  one  is  later.  It  then 
ddetes  the  earlier  time  in  eclipse. 

23.  defiule  late^_sun  "Find  latest  time  in  sun  for  current  orbit" 

The  computer  finds  two  times  that  the  satellite  is  in  the  sun,  and  determines  which  is 
later.  It  then  ddetes  the  eariier  time  in  the  sun. 
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24.  d^nile  leave_eclipse 

If  there  is  an  in  eclipse  hict  followed  by  a  later  (in_sun  time)  &ct,  then  the  satellite 
just  left  the  earth's  shadow.  In  this  case,  the  nile  deletes  the  (in  eclipse  time)  fact,  and 
stores  the  time  that  the  satellite  left  the  earth's  shadow  as  a  new  fact. 

25.  defrule  findjatest 

If  this  rule  finds  two  latest  facts  as  initiated  by  the  read-data  rule,  it  will  delete  the 
earlier  fimt.  Eventually,  only  one  fiurt  remains,  and  is  output  in  the  "teldata.dat"  file  once 
all  data  has  been  read. 

26.  defiule  solar_cdlsjcold 

This  rule  first  determines  if  a  telonetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  bemi  checked  previously, 
then  a  solar  cdl  temperature  point  is  searched  for  and  checked  to  see  if  it  is  below  the 
lower  tenqrerature  range.  The  counter  for  the  ceU  is  also  found.  If  h  is  out  of  limits,  then 
the  rule  saves  the  telemetry  point,  temperature,  and  time  tag.  The  red  telemetry  colors  for 
this  condition  are  saved,  the  (new  fiict)  is  deleted,  and  the  out  of  range  counto*  is 
inaemented. 

27.  defiule  solar_cdls_cool 

This  rule  first  d^ermines  if  a  telemetry  point  has  been  limit  checked  earli^  by 
finding  the  (new  fiut)  assoted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  solar  ceU  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  the 
lower  tenqrerature  range,  and  bdow  the  lower  normal  opoating  tonperature.  The 
counter  for  the  cell  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the  telem^ry 
p(^  temperature,  and  time  tag.  The  yellow  telemetry  colors  for  this  condition  are  saved, 
the  (new  fiict)  is  deleted,  and  the  out  of  range  counter  is  incremented. 

28.  defiule  solar_cells_warm 
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This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
fiiuling  the  (new  fact)  asserted  by  read>data.  If  a  point  has  not  been  checked  previously, 
then  a  solar  cell  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  upper 
normal  operating  temperature,  and  below  the  upper  temperature  range.  The  counter  for 
the  cell  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the  telemetry  point, 
temperature,  and  time  tag.  The  yellow  telemetry  colors  for  this  condition  are  saved,  the 
(new  fact)  is  ddeted,  and  the  out  of  range  counter  is  incremented. 

29.  defiule  solar_cells_hot 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  poim  has  not  been  checked  previously, 
then  a  sdar  cdl  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  the 
upper  temperature  range.  The  counter  for  the  cell  is  also  found.  If  it  is  out  of  limits,  then 
the  rtile  saves  the  telemetry  point,  temperature,  and  time  tag.  The  red  telenu^  colors  for 
this  condition  are  saved,  the  (new  fiu:t)  is  dd^ed,  and  the  out  of  range  counter  is 
incremeiited. 

30.  defiule  bat_vott_tooJow 

This  rule  first  determines  if  a  ^ ‘><mietry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiu^t)  asserted  by  ^lata.  If  a  point  has  not  been  checked  previously, 

then  a  battery  voltage  point  is  searched  for  and  checked  to  see  if  it  is  bdow  lower  voltage 
range.  The  counter  fisr  the  battery  voltage  is  also  found.  Ifitisoutoflimits,thaitherule 
saves  the  tdemetiy  point,  temperature,  and  time  tag.  The  red  tdemetry  colors  for  this 
condition  are  saved,  the  (new  fiut)  is  ddeted,  and  the  out  of  range  counter  is  increnmnted. 
This  rule  determines  that  whenever  the  battery  voltage  gets  too  low,  the  powo*  system 
should  be  diecked  out,  and  recommends  either  reconditioning  the  batteries,  or  changing 
operaticms  so  that  the  batteries  do  not  drain  as  much  during  eclipse. 
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3 1 .  defiule  bat_volt Jo w 

This  nile  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiict)  asserted  by  read-<lata.  If  a  point  has  not  bera  checked  previously, 
then  a  battery  voltage  point  is  searched  for  and  checked  to  see  if  it  is  above  lower  voltage 
range,  and  bdow  the  lower  normal  operating  voltage.  The  counter  for  the  battery  voltage 
is  also  found.  If  it  is  out  of  limits,  then  tlM  rule  saves  the  telemetry  point,  tonp^ture, 
and  time  tag.  The  ydlow  telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is 
ddeted,  and  the  out  of  range  counter  is  incranented.  The  same  recommendations  are 
made  as  for  bat_voItjtoo Jow. 

32.  defiule  bat_volt_high 

This  rule  first  determines  if  a  telem^  point  has  been  limit  diecked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  battery  voltage  p<rat  is  searched  for  and  checked  to  see  if  it  is  above  upper  normal 
opmting  vohage,  and  below  the  upper  voltage  range.  The  counter  for  the  battery  voltage 
is  also  found.  If  it  is  out  of  Umits,  then  the  nile  saves  the  telemetry  point,  temperature, 
and  time  tag.  The  yellow  telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is 
deleted,  and  the  out  of  range  counter  is  inoemented.  If  the  battery  voltage  gets  too  high, 
the  rule  recommends  trickle  chai^it^  the  battoies,  which  limits  the  charging  current. 

33.  defiule  bat_volt Joojugh 

This  rule  first  det^nines  if  a  tdemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiict)  asserted  by  read-data.  If  a  point  has  not  beta  checked  previously, 
then  a  battery  volti^e  point  is  searched  for  and  checked  to  see  if  it  is  above  uppo* 
maximum  vohage  range.  The  counter  for  the  battery  voltage  is  also  found.  Ifhisrxitof 
limits,  then  the  rule  saves  the  telemetry  point,  voltage,  and  time  tag.  The  red  telemetry 
cdors  for  this  ermdition  are  saved,  the  (new  fimt)  is  ddeted,  and  the  out  of  range  counter 
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is  incremented.  If  the  battery  voltage  gets  too  high,  tl»  rule  recommends  trickle  charging 
the  battmies,  which  linuts  the  charging  current. 

34.  defiule  bat_temp_cold 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiict)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  battery  temperature  point  is  searched  for  and  checked  to  see  if  it  is  bdow  the  Iowa* 
temperature  range.  The  counter  for  the  battery  tenq)erature  is  also  found.  Ifitisoutof 
limits,  then  the  rule  saves  the  telonetry  point,  temperature,  and  time  tag.  The  red 
telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is  delved,  and  the  out  of 
range  counter  is  iiKiemented. 

35.  defiule  batjteinp_cooi 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlior  by 
finding  the  (new  &ct)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  battery  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  the  lower 
temperature  range,  and  below  the  lower  normal  temperature  operating  range.  The  counter 
fin*  the  battery  temperature  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the 
telemetry  point,  temperature,  and  time  tag.  The  yellow  telemetry  colors  for  this  condition 
are  saved,  the  (new  fiict)  is  deleted,  and  the  out  of  range  counter  is  incremented. 

36.  defiute  batjempjvarm 

This  rule  first  determines  if  a  tdemetry  point  has  been  limit  checked  earlim-  by 
finding  the  (new  fi»t)  asserted  by  read-data.  Ifa  point  has  not  been  checked  previously, 
then  a  battery  temperature  pmnt  is  seardied  for  and  checked  to  see  if  it  is  above  upper 
normal  teaq)erature  range,  and  bdow  the  upper  temperature  range.  The  counter  for  the 
battery  temperature  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the  telemetry 
pc^  temperature,  and  time  tag.  The  ydlow  tdonetry  colors  for  this  condition  are  saved. 


the  (new  fact)  is  deleted,  and  the  out  of  range  counter  is  incremented.  The  rule 
recommends  trickle  charging  the  batteries  at  a  reduced  current  flow. 

37.  defiule  bat_temp_hot 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  battery  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  the  upper 
temperature  range.  The  counter  for  the  battny  temperature  is  also  found.  Ifitisoutof 
limits,  thoi  the  rule  saves  the  telemetry  point,  tonperature,  and  time  tag.  The  red 
telemetry  colors  for  this  condition  are  saved,  the  (new  ^)  is  deleted,  and  the  out  of 
range  counter  is  incremented.  The  rule  recommends  trickle  charging  the  batteries  at  a 
reduced  current  flow. 

38.  defiule  battery_cuiTent_high 

This  rule  first  determines  if  a  tdemetry  pdnt  has  been  limit  checked  earlier  by 
finding  the  (new  fiict)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  battery  current  point  is  searched  for  and  checked  to  see  if  it  is  above  the  upper 
normal  current  range  and  below  the  maximum  current  range.  The  counter  for  the  battery 
current  is  also  finind.  If  it  is  out  of  limits,  then  the  rule  saves  the  telemetry  point,  current, 
and  time  tag.  The  ydlow  telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is 
deleted,  and  tire  out  of  rar^e  counto’  is  inoemented. 

39.  defiule  batteryjxirrentjoojugh 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
findir^  the  (new  fiu:t)  asserted  by  read-data.  If  a  point  has  not  beoi  checked  previously, 
then  a  battery  currem  poim  is  searched  for  and  checked  to  see  if  it  is  above  the  upper 
maxifflum  current  range.  The  counter  for  the  battery  current  is  also  found.  Ifitisoutof 
limits,  then  the  rule  saves  the  telemetry  point,  current,  and  time  tag.  The  red  tel«netry 
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colors  for  this  condition  are  saved,  the  (new  fact)  is  deleted,  and  the  out  of  range  counter 
is  incranented. 

40.  de&ule  tx_current_high 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
findii^  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  transmitter  current  point  is  searched  for  and  checked  to  see  if  it  is  above  the  upper 
normal  current  range  and  below  the  maximum  current  range.  The  counter  for  the 
tran^tter  current  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the  telemetry 
point,  current,  and  time  tag.  The  yellow  telemetry  colors  for  this  condition  are  saved,  the 
(new  fact)  is  deleted,  and  the  out  of  range  counter  is  incremented 

41.  defiule  tx_current_too_high 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  transmitter  current  point  is  searched  for  and  checked  to  see  if  it  is  above  the 
maximum  current  range.  The  counter  fisr  the  transmitter  current  is  also  found.  If  it  is  out 
of  limits,  then  the  rule  saves  the  telemetry  point,  current,  and  time  tag.  The  red  telemetry 
colors  for  this  condition  are  saved,  the  (new  fact)  is  deleted,  and  the  out  of  range  counter 
is  incremented 

42.  defiule  bus_volt_too Jow 

This  rule  first  d^ermines  if  a  telemetry  point  has  beoi  limit  checked  earlier  by 
finding  the  (new  fiict)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  bus  voltage  point  is  searched  for  and  checked  to  see  if  it  is  below  the  minimum 
voltage  range.  The  crxinter  for  the  bus  voltage  is  also  found.  If  it  is  out  of  limits,  then  the 
rule  saves  the  telemetry  point,  voltage,  and  time  tag.  The  red  telonetry  colors  for  this 
condition  are  saved,  the  (new  fimt)  is  deleted,  and  the  out  of  range  counter  is  incremoited 
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43.  defrule  bus_voh_low 

This  rule  first  determines  if  a  telem^ry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiu^)  asserted  by  read-data.  If  a  point  has  not  been  clicked  previously, 
then  a  bus  volti^e  point  is  searched  for  and  checked  to  see  if  it  is  above  the  minimum 
voltage  range  and  below  the  normal  operating  voltage.  The  counter  for  the  bus  volt^e  is 
also  found.  If  it  is  out  of  timits,  then  the  rule  saves  the  telemetry  point,  voltage,  and  time 
ti^.  The  yellow  telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is  deleted, 
and  the  out  of  range  counter  is  incremented 

44.  defiule  bus_volt_high 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiict)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  bus  vohage  point  is  searched  for  and  checked  to  see  if  it  is  above  the  normal 
operating  voltage  and  bdow  the  maximum  voltage  range.  The  counter  for  the  bus  voltage 
is  also  fixind.  If  it  is  out  of  limits,  then  the  rule  saves  the  telemetry  point,  voltage,  and 
time  tag.  The  yellow  telemetry  colors  for  this  conctition  are  saved,  the  (new  fimt)  is 
(Meted,  and  the  out  of  range  ccmnter  is  incremented.  The  bus  voltage  is  directly  tied  to 
the  battery  (dur^g  rate,  so  if  the  bus  vohage  is  out  of  limits,  this  rule  recommends  to 
trickle  charge  the  battoy  to  limit  the  charging  current  flow. 

45.  defiule  bus_voltjtoo_high 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlio’  by 
finding  the  (new  fiut)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  bus  vohage  point  is  searched  for  and  checked  to  see  if  it  is  above  the  maximum 
vdtage  range.  The  counter  for  the  bus  voltage  is  also  found.  If  it  is  out  of  limits,  that  the 
rule  saves  the  tdemetry  point,  vohage,  and  time  tag.  The  red  tdemetry  colors  for  this 
ccmdition  are  saved,  the  (new  fiict)  is  dd^ed,  and  the  out  of  range  counter  is  incretnemed. 
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The  bus  voltage  is  directly  tied  to  the  battery  charging  rate,  so  if  the  bus  voltage  is  out  of 
limits,  this  rule  recommnids  to  trickle  charge  the  battery  to  limit  the  charging  current 
flow. 

46.  de&ule  bus_temp_cold 

This  rule  flrst  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiict)  dsserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  bus  tnnperature  point  is  searched  for  and  checked  to  see  if  it  is  below  lower 
temperature  range.  The  counter  flir  the  bus  temperature  is  also  found.  Ifitisoutof 
limits,  then  the  rule  saves  the  telemetry  point,  temperature,  and  time  tag.  The  red 
telonetry  colors  for  this  condition  are  saved,  the  (new  fact)  is  deleted,  and  the  out  of 
range  counter  is  incremented. 

47.  defiule  busjtemp_cool 

This  nile  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiict)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  bus  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  lower 
tm^ierature  range,  and  below  the  Iowa*  normal  operating  temperature.  The  ccmnter  for 
the  bus  temperature  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the  telemetry 
point,  temperature,  and  time  tag.  The  ydlow  tdonetiy  colors  for  this  condition  are  saved, 
the  (new  fiict)  is  ddeted,  and  the  out  of  range  counter  is  incremented. 

48.  defiule  bus_temp_warm 

This  rule  first  determines  if  a  telonetiy  point  has  beat  limit  checked  earlio-  by 
finding  the  (new  fact)  assoted  by  read-data.  If  a  point  has  not  been  checked  previously, 
thm  a  bus  toiqrarature  point  is  searched  for  and  checked  to  see  if  it  is  above  the  upper 
normal  operatii^  temperature,  and  below  the  upper  temperature  range.  The  counter  for 
the  bus  tenqierature  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the  telemetry 
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point,  tonpotnure,  and  time  ti^.  The  ydlow  telemetry  colors  for  this  condition  are  saved, 
the  (new  fact)  is  deleted,  and  the  out  of  range  counter  is  incremented. 

49.  defhile  bus_temp_hot 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  bus  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  the  upper 
temperature  range.  The  counter  for  the  bus  temperature  is  also  found.  Ifitisoutof 
limits,  then  the  rule  saves  the  telemetry  point,  temperature,  and  time  tag.  The  red 
telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is  deleted,  and  the  out  of 
range  counter  is  increme^ited. 

50.  defitile  tx_volt_tooJow 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiu:t)  asserted'  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  transmitter  voltage  point  is  searched  for  and  checked  to  see  if  it  is  below  the 
ndnimum  voltage  ratine.  The  counter  for  the  transmitter  voltage  is  also  found.  If  it  is  out 
of  limits,  then  the  rule  saves  the  telemetry  point,  voltage,  and  time  tag.  The  red  telemetry 
color  chaises  for  this  condition  are  saved,  the  (new  fact)  is  ddeted,  and  the  out  of  range 
counter  is  incronented.  A  high  transmitter  bus  voltage  is  directly  tied  to  the  electrical 
power  system  Inis,  so  there  is  most  likely  a  problem  in  the  over  power  syston.  The  rule 
reconunends  checldng  the  powo*  system  for  voltages  out  of  range. 

51.  defitile  tx_volt Jow 

This  rule  first  determines  if  a  telonetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  feet)  asserted  by  read-data.  If  a  point  has  not  bear  checked  previously, 
then  a  transmitter  voltage  point  is  searched  for  and  checked  to  see  if  it  is  below  the  normal 
vokage  range  and  above  the  minimum  voltage  range.  The  counter  for  the  transmitter 
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voltage  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the  telemetry  point,  voltage, 
and  time  tag.  The  telemetry  color  changes  for  this  condition  are  saved,  the  (new  fact)  is 
deleted,  and  the  out  of  range  counter  is  incremented. 

52.  defhile  tx_volt_high 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  transmitter  voltage  point  is  searched  for  and  checked  to  see  if  it  is  above  the  normal 
operating  voltage  and  below  the  maximum  voltage  range.  The  counter  for  the  transmitter 
voltage  is  also  found.  If  h  is  out  of  limits,  then  the  rule  saves  the  telemetry  point,  voltage, 
and  time  tag.  The  yellow  telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is 
deleted,  and  the  out  of  range  counter  is  incremented. 

53.  defioile  tx_volt_too_high 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  eariier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  transmitter  voltage  point  is  searched  for  and  checked  to  see  if  it  is  above  the 
maximum  voltage  range.  The  counter  for  the  transmitter  voltage  is  also  found.  Ifitisout 
of  limits,  that  the  rule  saves  the  telemetry  point,  voltage,  and  time  tag.  The  red  telemetry 
colors  for  thb  condition  are  saved,  the  (new  fiict)  is  deleted,  and  the  out  of  range  counter 
is  incremented. 

54.  defiule  tx_ten^_cold 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
that  a  transmitter  tonperature  point  is  searched  for  and  checked  to  see  if  it  is  below  the 
minimum  temperature  range.  The  counter  for  the  transmitter  tenq)erature  is  also  found.  If 
it  is  out  of  limits,  then  the  rule  saves  the  telemetry  point,  temperature,  and  time  tag.  The 
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red  telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is  deleted,  and  the  out  of 
range  counter  is  incremented.  The  recommendation  is  made  whenever  the  transmitter 
temperature  is  low  to  transmit  more  often  if  the  power  budget  allows. 

55.  defhile  tx_temp_cool 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  transmitter  temperature  point  is  searched  for  and  checked  to  see  if  it  is  below  the 
normal  operating  voltage  range  and  above  the  minimum  temperature  range.  The  counter 
for  the  transmitter  temperature  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the 
telemetry  point,  temperature,  and  time  tag.  The  yellow  telemetry  color  changes  for  this 
condition  are  saved,  the  (new  fact)  is  deleted,  and  the  out  of  range  counter  is  incremented. 

56.  deftule  txjtemp_warm 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  transmitter  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  the 
normal  op«ating  temperature  range  and  below  the  maximum  temperature  range.  The 
counter  for  the  transmitter  temperature  is  also  found.  If  it  is  out  of  limits,  then  the  rule 
saves  the  telemetry  point,  temperature,  and  time  tag.  The  yellow  telemetry  colors  for  this 
condition  are  saved,  the  (new  fact)  is  deleted,  and  the  out  of  range  counter  is  incremented. 
A  recommendation  is  made  for  a  transmitter  that  is  higher  the  temperature  range  may  be 
able  to  be  fixed  by  increasing  the  attenuation  on  the  transmitted  signal,  so  the  transmitter 
wUl  use  less  power,  or  switch  transmitters. 

57.  defiule  txjtemp_hot 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiuft)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously. 
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then  a  transmitter  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  the 
maximum  temperature  range.  The  counter  for  the  transmitter  temperature  is  also  found. 

If  it  is  out  of  limits,  then  the  rule  saves  the  telemetry  point,  temperature,  and  time  tag. 

The  red  telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is  deleted,  and  the  out 
of  range  counter  is  incremented. 

58.  defitile  rx_temp_cold 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  receiver  tenqierature  point  is  searched  for  and  checked  to  see  if  it  is  below  the 
minimum  tonperature  range.  The  counter  for  the  recover  temperature  is  also  found.  If  it 
is  out  of  limits,  then  the  rule  saves  the  telonetry  point,  temperature,  and  time  tag.  The  red 
tdemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is  deleted,  and  the  out  of 
range  counter  is  incremented.  Any  time  a  receiver  is  below  normal  operating 
temperatures,  a  reconunendation  is  made  to  switch  receivers  and  determine  if  the 
secondary  has  any  problems. 

59.  defiule  ix_tanp_cool 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  bear  checked  previously, 
then  a  recover  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  the 
minimum  temperature  range  and  below  the  normal  operating  temperature.  The  counter 
for  the  receivo  temperature  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the 
tdemetiy  point,  temperature,  and  time  tag.  The  yellow  telemetry  colors  for  this  condition 
are  saved,  the  (new  fiict)  is  deleted,  and  the  out  of  range  counter  is  incremented. 

60.  defivle  rx_temp_warm 
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This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  receiver  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  upper 
normal  operating  temperature,  and  below  the  upper  temperature  range.  The  counter  for 
the  receiver  temperature  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the 
telemetry  point,  temperature,  and  time  tag.  The  yellow  telemetry  colors  for  this  condition 
are  saved,  the  (new  fact)  is  deleted,  and  the  out  of  range  counter  is  incremented. 

61 .  defittle  rx_temp_hot 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  receiver  temperature  point  is  searched  for  and  checked  to  see  if  it  is  above  the 
upper  temperature  range.  The  counter  for  th«  receiver  temperature  is  also  found.  If  it  is 
out  of  limits,  then  the  rule  saves  the  telemetry  point,  temperature,  and  time  tag.  The  red 
telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is  deleted,  and  the  out  of 
range  counter  is  incremented. 

62.  defitile  dcs_temp_cold 

This  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fiict)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  distal  control  system  temperature  point  is  searched  for  and  checked  to  see  if  it  is 
bdow  the  minimum  temperature  range.  The  counter  for  the  DCS  temperature  is  also 
found.  If  it  is  out  of  limits,  then  the  rule  sav^  the  telemetry  point,  temperature,  and  time 
tag.  The  red  telemetry  colors  for  this  condition  are  saved,  the  (new  fact)  is  deleted,  and 
the  out  of  range  counter  is  incremented.  Whenever  the  DCS  is  outside  of  normal 
tenq)eratures,  the  rules  recommend  switching  DCSs. 

63.  defirule  dcs_tanp_cooi 
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This  aile  first  determines  if  a  telemetry  point  has  been  limit  checked  eartier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  digital  control  system  temperature  point  is  searched  for  and  checked  to  see  if  it  is 
above  lower  temperature  range,  and  below  the  lower  normal  operating  temperature.  The 
counter  for  the  DCS  temperature  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the 
telemetry  point,  temperature,  and  time  tag.  The  yellow  telemetry  colors  for  this  condition 
are  saved,  the  (new  fitct)  is  deleted,  and  the  out  of  range  counter  is  incremented. 

64.  defiule  dcs_temp_warm 

This  rule  first  determines  if  a.telemetiy  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
then  a  digital  control  system  temperature  point  is  searched  for  and  checked  to  see  if  it  is 
above  upper  normal  operating  temperature,  and  below  the  upper  temperature  range.  The 
counter  for  the  DCS  temperature  is  also  found.  If  it  is  out  of  limits,  then  the  rule  saves  the 
tdemetry  point,  temperature,  and  time  tag.  The  yellow  telemetry  colors  for  this  condition 
are  saved,  the  (new  fiu;t)  is  deleted,  and  the  out  of  range  counter  is  incremented. 

65.  defiule  dcs_temp_hot 

Ttus  rule  first  determines  if  a  telemetry  point  has  been  limit  checked  earlier  by 
finding  the  (new  fact)  asserted  by  read-data.  If  a  point  has  not  been  checked  previously, 
thoi  a  digital  control  system  temperature  point  is  searched  for  and  checked  to  see  if  it  is 
above  the  upper  temperature  range.  The  counter  for  the  DCS  temperature  is  also  found. 
If  it  is  out  of  limits,  then  the  rule  saves  the  telemetry  point,  temperature,  and  time  tag. 

The  red  tdonetry  colors  for  this  condition  are  saved,  the  (new  &ct)  is  ddeted,  and  the  out 
of  range  counter  is  incremented. 

66.  defiule  edacseu_counter 


81 


The  first  step  in  this  rule  is  to  find  the  error  detection  and  correction  counter  and  test 
to  determine  if  too  many  errors  have  occurred  in  the  software.  ED  AC  errors  are  most 
likely  caused  by  radiation  or  particles  striking  the  internal  components  of  the  spacecraft. 
With  the  error  detection  and  correction,  it  can  detect  and  correct  one  error,  and  detect 
two  errors  without  correction.  If  the  number  of  errors  is  large,  then  the  probability  of 
getting  two  errors  which  are  not  correctable  in  the  same  space  greatly  increases.  The 
RAM  wash  is  a  subroutine  to  read  all  data  in  memory,  do  the  error  checking  and 
correcting,  counting  all  errors,  and  writes  the  data  back  into  memory.  This  rule 
recommends  increasing  the  frequency  of  RAM  wash  to  lower  the  number  of  single  event 
upsets  in  the  RAM. 

67.  deftule  worst_case_system 

The  main  telemetry  display  will  only  show  the  color  for  the  worst  case  of  the 
categories  subsystems.  In  every  limit  checking  rule,  if  the  same  fact  is  asserted  twice  for 
the  same  system,  CLIPS  will  only  keep  one  assertion.  Then  only  one  red  and  one  yellow 
fact  at  most  will  remain.  In  this  case,  the  rule  finds  two  facts  for  the  same  set  of  telemetry 
points,  one  red  and  one  yellow.  It  then  deletes  the  yellow  case  and  saves  the  worst  case, 
the  red  one.  If  there  is  only  one  yellow  case,  then  it  will  remain  as  the  worst  case. 

68.  defivle  worst_case_tel_pt 

This  rule  is  very  similar  to  the  worstjcase_system,  but  instead  of  saving  the  worst 
case  for  the  system,  it  is  only  saving  the  wor^  case  for  each  telemetry  point.  Since  at 
difioent  tunes  any  telemetry  point  could  be  red  or  ydlow,  only  the  red  case  will  remain. 

69.  deftule  initializejoccurence jrroblem 

This  rule  is  to  start  the  process  of  finding  when  during  an  orbit  a  telemetry  point 
goes  out  of  limits.  If  a  telemetry  point  goes  out  of  limits  every  orbit,  this  algorithm  will 
^ve  the  user  an  idea  if  it  occurs  at  about  the  same  time  every  orbit,  or  if  it  is  not  related  in 
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any  way  to  the  orbital  period.  The  rule  finds  a  telemetry  problem  and  the  last  time  the 
satellite  left  eclipse  and  makes  a  fact  of  first  time  the  problem  occurred. 

70.  definle  find_first_occurence 

In  this  situation,  the  rule  finds  two  different  facts  that  state  the  first  time  a  problem 
occurred,  and  determines  which  actually  occurred  first,  within  the  same  orbit,  and  deletes 
the  latest  occurrence. 

71.  defiule  initialize_high_andJow_orbit 

In  the  same  manner  as  the  find_first_occurence  rules,  this  set  of  rules  finds  the 
highest  value  per  orbit  of  each  telemetry  point.  The  rule  first  finds  a  telemetry  point  that  is 
an  analog  value,  not  a  binary  state  or  counter,  and  initialized  that  ^  as  the  high  for  the 
orbit.  This  rule  also  asserts  the  &ct  as  the  highest  value  to  start  the  search  for  the  highest 
telemetry  point  in  the  entire  file. 

72.  defiule  find_high_orbit 

The  next  step  in  the  process  is  to  find  two  high  values  of  the  same  telemetry  point 
that  occurred  within  the  same  orbh,  and  ddete  the  lower  value.  The  high  value  is  then 
written  to  a  file  at  the  end  of  each  orbit  with  the  save_hi_and_iow_data  rule. 

73.  defiule  find_highest 

Like  the  findJiigh_orbit  routine,  this  rule  searches  for  the  highest  value  of  each 
telemetry  point  in  the  file  for  presentation  to  the  user.  The  highest  value  will  give  the  user 
a  quidc  idea  of  how  close  the  tdemetry  point  is  to  its  limits.  The  highest  &cts  have 
already  bear  asserted,  so  this  rule  finds  two  highest  facts,  and  deletes  the  data  point  with 
the  lower  value. 

74.  defiule  findjowjorbit 

Just  like  the  find  Jiigh_orbtt,  this  rule  finds  two  low  values  of  the  same  tdonetry 
point  that  occurred  within  the  same  orbit,  and  deletes  the  higher  value. 
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75.  defiule  findjowest 

Like  the  findJow_orbit  routine,  this  rule  searches  for  the  lowest  value  of  each 
telem^ry  point  in  the  file  for  presentation  to  the  user.  The  lowest  value  will  ^ve  the  user 
a  quick  idea  of  how  close  the  telemetry  point  is  to  its  limits.  The  lowest  facts  have  already 
been  asserted,  so  this  rule  finds  two  lowest  &cts,  and  deletes  the  data  point  with  the  higher 
value. 

76.  defiule  checkjconfiguration 

This  rule  uses  the  configuration  file  that  contains  the  information  about  the  satellite's 
settings.  This  rule  compares  the  ground's  settings  with  the  satellites  to  determine  if  the 
satellite  has  autonomously  changed  its  configuration.  Two  facts  are  found,  the 
configuration  &ct  and  the  telemetry  Act  for  the  same  system.  The  settings  for  that  system 
are  then  compared.  If  they  are  not  the  same,  then  the  fact  that  the  satdlhe  has  changed  its 
configuration  is  assoted. 

77.  defiule  del_config 

Once  the  telemetiy  data  file  is  closed,  there  are  no  more  settings  to  be  compared,  so 
the  configuration  &cts  are  deleted. 

78.  defitile  dd_high 

Once  the  telemetry  data  file  is  closed,  the  high  data  points  per  orbit  are  still  in 
memory.  Since  the  orbh  will  not  be  completed  in  the  telemetry  data,  these  are  of  no  use 
since  it  is  not  ktmwn  of  these  actually  are  the  high  values  fi>r  the  entire  orbit.  Thoefisre, 
this  ride  deletes  all  unwanted  high  fiuns. 

79.  d^ule  deljow 

Once  the  telemetry  data  file  is  closed,  the  low  data  points  per  orbit  are  also  still  in 
memory.  Since  the  orbh  will  not  be  completed  in  the  telemetry  data,  these  are  of  no  use 
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since  it  is  not  known  of  these  actually  are  the  low  values  for  the  entire  orbit.  Therefore, 
this  rule  deletes  all  unwanted  low  facts. 

80.  defiule  constant_out_counter 

Once  a  telemetry  point  has  exceeded  a  limit,  it  may  either  stay  out  of  limits,  or  fall 
back  within  the  limits.  This  rule  will  determine  if  the  telemetry  point  stayed  out  of  limits 
once  it  exceeded  those  limits. 

This  accomplished  by  initializing  a  counter  that  fires  once  an  orbit  after  a  telemetry 
point  has  exceeded  its  limits.  If  there  is  a  limit  exceedance  and  a  counter  hasn't  been 
started  yet,  then  a  counter  is  started. 

81.  de&ule  out_count 

This  rule  continues  the  constant_out_counter.  The  fact  is  fired  by  the  data  point  that 
is  being  read  by  read-data.  If  a  data  point  is  read  that  has  a  counter  already,  then  the 
counter  is  incremented  and  the  fact  that  fired  the  rule  is  deleted. 

82.  defiule  check_counts 

Once  the  telemetry  data  file  is  closed,  this  rule  checks  on  the  counters  to  determine  if 
the  telemetry  point  stayed  out  of  limits  once  it  exceeded  them.  It  gets  two  counters,  the 
count  that  incrememed  each  time  the  data  point  was  read  after  it  went  bad,  and  the 
counter  of  the  number  of  times  that  the  telemetry  point  was  out  of  limits.  If  these  two 
counters  are  the  same,  then  the  telemetry  point  stayed  out  of  limits  once  it  exceeded  the 
limits  the  first  time.  The  counter  since  the  first  occurrence  is  deleted  so  that 
save_teiemetery_data  can  fire.  This  prevents  save_teleroetery_data  fi'om  deleting  the 
counters  before  this  rule  can  use  them. 

83.  defiule  notjilwaysjout 

Hus  rule  does  the  same  process  as  out_count,  except  that  it  sees  if  the  counters  are 
dififerent.  If  they  are  dififerent,  then  the  tdemetry  point  did  not  stay  out  of  parametoe,  and 


the  counter  since  the  first  occurrence  is  dd^ed.  This  allows  the  savejelem^ery  data 
nile  to  fire. 

84.  defitile  del_next 

The  read-data  rule  asserts  rules  so  that  the  outjcount  routine  can  work.  Once  the 
telemetry  data  file  is  closed,  these  facts  are  no  longer  needed.  This  routine  determines  that 
the  file  is  closed,  and  deletes  the  fiuts  assmed  by  read-data 

85.  defiule  savejGrst_problems 

The  problems  with  the  spacecraft  are  written  to  an  ASCII  file  so  that  they  may  be 
presented  to  the  user  in  the  grq>hical  inta^u:e.  When  the  telemetry  data  file  is  closed,  a 
problem  firct  is  found  that  was  also  the  first  time  that  the  problem  occurred.  The  two  facts 
are  then  combined  to  inform  the  user  that  a  problem  occurred,  the  time  tag,  and  the  time 
into  the  orbit  the  problem  occurred.  The  information  is  written  to  the  "problem.dat”  file 
and  ddeted  fiom  manoiy. 

86.  defiule  save_problems 

Problems  that  were  not  the  first  in  its  orbit  are  also  saved  to  the  problem  file.  In  this 
case,  the  rule  finds  a  &ct,  and  determines  that  there  is  not  a  corresponding  first  time  &ct. 
The  information  is  thoi  written  to  the  "problem.dat"  file  and  deleted  Srom  memory. 

87.  defiule  savejdedsions 

The  dedsions  that  the  program  arrives  at  are  written  to  an  ASCII  file  fi^r  display  to 
the  user  oace  the  telemetry  data  file  has  bera  completely  read.  If  the  telonetry  data  file  is 
ctosed,  then  the  rule  writes  ail  decisions  that  are  recommended  by  the  program  to  the 
”dectde.dat”  file.  The  decisions  are  then  ddeted  fiom  memory. 

88.  defiule  save_tdemetry_colors 

Once  the  tdem^ry  file  is  dosed,  the  tdemetry  point  colors  are  written  to  the  ASCII 
file  "colors.dat".  This  information  is  used  to  change  the  colors  displayed  to  the  user.  If  a 
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telemetry  point  is  not  specified  by  the  file  to  be  red  or  yellow,  then  the  user  interfitce 
assumes  that  the  telemetry  point  is  in  the  ^een.  Once  the  color  facts  are  written  to  file, 
they  are  removed  Srom  memory. 

89.  defiule  save_system_colors 

Once  the  telmetry  file  is  closed,  the  telemetry  syston  colors  are  written  to  the 
ASCII  file  "colorsys.dat".  This  information  is  used  to  change  the  colors  of  the  major 
categories  of  telemetry  displayed  to  the  user.  If  a  telemetry  system  is  not  specified  by  the 
file  to  be  red  or  yellow,  then  the  user  interface  assumes  that  the  system  is  in  the  green. 
Once  the  color  fiuns  are  written  to  file,  they  are  removed  fi-om  memory. 

90.  defiule  save_hi_andJow_data 

Here,  the  high  and  low  data  points  per  orbit  are  written  to  the  "hivals.dat"  and 
”lovals.dat"  files.  When  there  are  two  "»m”  with  times  tags  facts,  then  the  satellite  has 
completed  an  orbit.  The  rule  then  deletes  the  earlier  "sun”  fact  to  start  the  process  again. 
The  high  and  low  values  for  each  data  point  are  then  found  and  written  to  file.  The  first 
value  in  eadi  line  of  the  file  is  the  time  tag  for  the  beginning  of  the  orbit.  Since  each  high 
and  low  value  will  occur  at  a  dififerent  time  fi}r  each  telemetry  point,  only  the  orbit  time  is 
kept  so  that  otdy  two  files  need  be  used.  The  time  tag  is  then  followed  by  the  high  or  low 
value  for  that  orbit.  The  facts  are  written  to  the  files  in  the  same  order  as  the  telemetry 
stream. 

91.  defitile  savejtelemeteryjdata 

The  telemetry  data  is  saved  to  a  file  "teldata.dat"  so  that  the  information  can  be 
displayed  to  the  user  through  the  telemetry  display  interfile.  This  rule  fires  after  the 
tdemetry  data  file  is  dosed,  and  the  countjout  rule  no  longer  needs  the  data  since  it  is 
ddeted  in  this  step.  The  rule  finds  ail  of  the  &cts  concerning  each  telemetry  points 
highest,  lowest,  and  latest  values.  It  also  collected  each  points'  counter  for  the  number  of 
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times  that  it  was  out  of  limits.  It  then  writes  all  of  the  information  to  file  in  an  orderly 
&shion.  The  teldata.dat  file  will  be  in  the  same  order  as  the  telemetry  stream.  The  first 
row  will  be  the  first  telemetry  point  read  in  the  file.  The  first  number  is  the  highest  value 
that  the  telemetry  point  had  in  the  file.  The  next  is  the  lowest  value.  The  third  number  is 
the  counter  of  the  number  of  times  that  the  point  was  out  of  limits.  The  last  number  in 
each  line  is  the  latest  value  of  that  telemetry  point.  All  of  the  data  written  to  file  is  thoi 
retracted  fi’om  memory. 


The  following  matrices  show  the  dependence  of  the  rules  on  each  other.  Across  the 


top  of  the  matrix  represents  that  left  hand  ride  of  the  rule,  while  doAvn  the  left  side 
represents  the  right  hand  side  of  the  equation.  The  X's  marie  the  assertions  from  the  right 
hand  ride  of  the  rules  that  cause  the  left  hand  sides  to  become  satisfied. 
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APPENDIX  B. 


Code  Developed  for  PANSAT  Telemetry  Analysis 


(defrule  open-file 
(initial-fact) 

■> 

(retract  0) 
(printout  t  "Hanc 


"Open  the  telemetry  and  configuration  file* 
;Do  this  operation  first 

; Prevent  firing  again 
of  file  to  read?"  crlf)  ;As]c  file  to  read 


(bind  7naaie  (read)) 

(open  7naBie  data  "r") 

(open  "aetting.dat"  setting  "r”) 
(open  "llfevals.dat"  lifeval  "a") 
(open  "hlvala.dat"  hlvals  "a") 
(open  "lovals.dat"  lovals  "a") 


;Get  file  naste 
;Open  the  data  file 
;Open  the  configuration  file 
;Open  lifetime  data  file 
;Open  high  value /orbit  file 
;Open  low  value /orbit  file 


(open  "probleBia.dat”  problems  "w")  ;Open  problem  file 


(open  "decide.dat"  decide  "w") 
(<^n  "colors.dat"  colors  "w") 


;Open  decision  file 
}Open  color  file 


(open 

(open 


'colorsys.dat*  colorsys  "w")  ;Open  color  file 


(open  "teldata.dat*  teldata  "w") 
(assert  (read-file  ?name)) 
(assert  (nextline)) 

(assert  (time  0)) 

(assert  (tel  not  111)) 

(assert  (setting  open)) 

(assert  (nextval)) 


;Open  telemetry  data  file 
;Save  name  of  file 
;8et  up  to  read  file 


(defrule  read_parameter  "Rea 
(setting  open) 

7ne]it<-  ( nextval ) 

-> 

(bind  ?set  (read  setting) ) 
(assert  (set  ?set)) 
(retract  ?next) 


ter  "Read  the  subsystem  naaw" 

; Insure  conflg  file  open 
;Get  address  of  nextval 


;Read  subsystem  name 
;Assert  naaw 
; Remove  nextval 


(defrule  read_settlng 
(setting  open) 
7setting<-(set  ?set) 
(set  ‘"tor) 


"Read  the  subsystem  selected” 

; Insure  conflg  file  open 
;aet  address  of  set  fact 
;  Check  not  lOF  aiarker 


(bind  ?val  (read  setting)) 
(assert  ( conflg  7set  ?val)) 
(assert  (nextval)) 

(retract  ?settlng) 


;Read  the  subsystem  selected 
;Assert  subsystem  selected 
;Read_parameter  fires  again 
; Retract  old  subsystem  naaw 


(defrule  eof__setting 
78et<-( setting  open) 
7end<-(set  lOP) 


"Read  the  lOF  marker” 

; Insure  conflg  file  open 
;Find  lOF  fact 


;Flnd  naxtval  fact 


?n«xt<- ( naxtval ) 


(closa  setting) 
(retract  7naxt) 
(retract  7end) 
(retract  7set) 


; close  configuration  file 
; Delete  nextval  fact 
; Delete  EOF  fact 


(defrule  read-^ta-header  "Read  the  name  of  telemetry  point* 


(read-file  7name) 

7next  <-  (nextline) 

(bind  ?var  (read  data)) 
(bind  7num  (read  data) ) 
(aasert(pt  7var)) 
(aase3:t(tot  7num)) 
(assert  (count  1)) 
(retract  7next) 


; Check  for  open  file 
;Get  address  of  fact 

;Read  telemetry  point  name 
;Read  number  of  points 
; store  the  point  name 
; Store  the  number  of  points 
; start  counter 
; Retract  to  end 


(defrule  read-data  "Read  the  data  values" 

(declare  (salience  -100))  ; Allows  all  rules 

(read-file  7naaM)  ;Check  for  open  file 

7olddata<-(tel  7varold  7valold  7dataold  7timold);del  old  data 
(pt  Tvar)  ^oet  point  name 

(pt  ~BOF)  {Check  to  see  not  EOF 

(pt  'tims)  {Check  to  be  not  time  tag 

(tot  7num)  {Get  nusiber  of  points 

(time  ?tim)  {Get  time  tag 

7oountval  <-  (count  7val)  {Get  counter 

(test  (<a>  7val  7num))  {Check  counter 


(bind  7data  (read  data) )  {Read  to  data  point 

(retract  7olddata)  {Delete  old  data  point 

(assert  (tel  7var  7val  7data  7tim)){Save  new  data 


(assert  (latest  7var  7val  7data 
(assert  (next  7var  7val) ) 

(bind  7val  (-i-  7val  1)) 

(retract  7countval) 

(assert  (count  7val)) 

(printout  lifeval  "  "  7data) 
(assert  (new  fact)) 

) 

(defrule  read-time  "Read  the  time 
(read-file  7name) 

7oldtot  <-  (tot  7nuffl) 

7oldcount  <-  (count  7val) 
7oldtime  <-  (tims  7tim) 

Fpttims  <-(pt  time) 


7tim)) {Start  latest  search 

{Start  constant  out  routine 

{increment  counter 

{Delete  old  counter 

{Save  new  counter 

{Write  to  lifetime  data  file 

{Stop  firing  on  limit  checks 

tag  from  the  file" 

{Check  for  open  file 
{Get  old  number  of  points 
{Get  old  counter 
{Get  old  time  tag 
{Get  time  fact 


(bind  7t  (read  data))  {Read  new  time  tag 

(retract  7oldtima)  {Delete  old  time  tag 

(retract  7pttime)  {Delete  point 

(retract  7oldtot)  {Delete  old  total  of  points 
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(retract  Toldcount) 

( asaart  <  naxtllna ) ) 

(asaart  <tlBia  ?t)) 

(printout  Ilf aval  crlf  7t) 

) 

(dafrula  and-of-llna  "Raad  to  tha 
?pt  <-  (pt  ?var) 

(pt  "EOF) 

? total  <-  (tot  7nuB) 

7countval  <-  (count  7val) 

(taat  (>  7val  7num) ) 


;Dalata  old  countar 
;Prapare  for  naxt  line 
;Sava  tlaia  tag 

;Hrlto  tlma  to  lifetime  file 

end  of  line” 

;Gat  point  name 
; Check  not  end  of  file 
;Oat  old  total  of  points 
;Gat  old  counter 
; Check  counter  more  points 


(retract  7countval) 
(retract  7total) 
(ratract  7pt) 
(assart  (naxtllna)) 


; Delete  old  counter 
;  Delate  old  nusibar  of  points 
; Delate  old  telemetry  name 
; Prepare  to  read  next  line 


) 

(dafrule  end-of-flle  "Have  reached  end  of  file  marker” 

7tot  <-  (tot  7num)  ;Get  old  total  of  points 

7count  <-  (count  7val)  ;6et  old  counter 

7readflla  <-  (raad>flle  7naHie)  ;Oat  data  file  nasie 
7ptaof  <-  (pt  EOF)  ;Qat  end  of  file 

7olddata  <-  (tel  7var2  7num2  7data2  7tlaia2)  ;aat  old  telesietry 


(ratract  7raadflla) 
(ratract  7olddata) 
(ratract  7ptaof) 
(ratract  7tot) 

(ratract  7count) 

(assart  (dona-raadlng) ) 
(close  data) 


; Delate  file  open  fact 
I Delate  old  telemetry  point 
; Delate  EOF  data  point 
) Delate  old  number  of  points 
; Delate  old  counter 
; Store  finished  reading  file 
; Close  data  file 


) 

(dafrule  start_counter  "Start  a  counter  for  number  of  problems' 
(tel  7var  7num  7data  7tlBw)  ;<Set  taleiwtry  point 

(not  (counter  7var  7num  7count))  ; check  no  counter 

a> 


(assert  (counter  7var  7num  0))  ;Start  counter 

) 

(dafrule  save__battery_currant 

(tel  batcur  7val  7amp  Tmln)  ;<3et  battery  currant 

■> 


(assert  (power  batcur  7val  7aiqp  7mln)))Save  In  different  form 

) 

(dafrule  save_cell_current 

(tel  callcur  7val  7ai9  Tmln)  ;<3et  cell  current 

■> 


(assert  (power  callcur  7val  7amp  Tmln)); save  In  different  form 

) 

(dafrule  In^sun  "check  to  see  If  the  satellite  Is  In  the  sun" 
(power  oellour  7val  Tamp  Tmln)  ;0et  battery  currant 
(test  (>  Tamp  .01))  ;Check  to  see  If  cells  lit 
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(aaaart  (ln_aun  Tnln)) 

) 

(dafrula  In^aclipaa  “Chaclc  to  sa« 
(poirar  batcur  ?Tal  ?aaip  7Bln) 
(taat  (>•  7ai9  <01)) 

(potrar  callcur  7val  7aBip2  7iiiln) 
(taat  (<■  7a]iqp2  .01)) 

«> 

(aaaart  (in  acllpaa  7nln)) 

) 

(dafrula  axcaad_potrar_budgat 
(powar  batcur  7val  7aiip  7mlii) 
(taat  (>•  7aiip  .01)) 

(powar  callcur  7val  7ai92  7Biln) 
(taat  (>  7aaip2  .01)) 


;Satalllta  in  aun 

if  the  satallita  ia  in  eclipae 
;Gat  battary  currant 
;Chac)c  battary  diacbarging 
;Gat  call  currant 
;Chack  that  cella  not  lit 

; Satallita  in  eclipaa 


;aat  battary  currant 
;Chack  battary  diacbarging 
;Gat  call  currant 
;Chack  that  calla  are  lit 


(aaaart  (pt  powar_budgat  1  axcaadad  7Bin)) 

(aaaart  (dec  chack_powar_ayataai) ) 

(aaaart  (dec  do  not_tranaBit  during_eclipaa) ) 

) 

(dafrula  delate  jold_poiMr_f acta 

(dona-raading)  ;No  more  data 

7old<-(powar  7var  7val  7amp  Taiin)  ;Gat  old  powar  fact 


(retract  7old) 

) 

(dafrula  aava_battary_taB(> 

(tal  battaaqp  7wal  7tamp  Tmin) 

■> 

(aaaart  (powar  battamp  7val  7 tamp 

) 

(dafrula  aawe_battary_volt 
(tal  batvolt  7val  7volt  Tmin) 

■> 


; Delate  old  powar  fact 

;Gat  battary  temp 
7min));8ava  in  different  form 

;Gat  battary  volt 


(aaaart  (powar  batvolt  7val  7volt 

) 

(dafrula  battjchargad 

(powar  battamp  ?val  7teqt  Tmin) 
(powar  batvolt  7val  7 volt  Tmin) 
(taat  (>  (-  Tvolt  (*  -.01  Ttaap)) 


Tmin) ); Sava  in  different  form 


;Gat  battery  tamp 
;Oat  battary  voltage 
9.8))  ;Tast  to  fit  line 


(aaaart  (event  battary  7val  charged  Tmin) ) 

) 

(dafrula  bat_temp_lncraaaa 

(firatiaw  bat  7val  charged  Tmin  7aftar);Gat  battary  charge  time 
(powar  battamp  7val  Ttaap  Tmin)  ;Gat  tamparatura 
(power  battaac)  7val  7taap2  ?mln2)  ;<Sat  later  temperature 
(taat  (<  Tmin  7min2)) 

(teat  (<  (-  7mln2  Tmin)  3600))  ;Cbaok  in  aama  orbit 
(taat  (<  Ttamp  7tomp2))  }Cback  tamp  inoraaaa 

■> 

(bind  Tohanga  (-  ?tamp2  Ttaaqp))  ;Sava  tai^  incraaaa 


96 


rt  ( t«iiip_chang«_charge  7change  7min2 ) ) 


) 

(d«frul«  larg«at_change 

(tMip_chang«_charge  7chang«  7min)  ;G«t  a  tamparatura  changa 
7la8a<-(tai9_changa_^charga  7chaDga2  7min2);Gat  aacond  changa 


(taat  (<  (-  7]iiln2  7mLa)  3600)) 
(taat  (>  7changa  7changa2)) 

(ratract  7laaa) 


;SaBa  orbit 
;Nhlch  la  laaa 

;0al  laaa  changa 


) 

(dafrula  lataat_ecllpaa  "Find  tha  laat  point  in  aclipaa  for  pariod* 
(in_aclipaa  7iBln)  ;<3at  old  tiaa  in  aclipaa 

7aac  <-  (in_aciipaa  7minl)  ;Gat  naw  tina  in  aclipaa 

(taat  (>  7inin~7]iiinl ) )  ;Ma]ca  aura  at  latar  tina 

■> 

(ratract  7aac)  ;Oalata  earlier  aclipaa  tine 

) 

(dafrula  lataat_aun  "Find  lataat  tina  in  aun  for  currant  orbit" 
(in_8un  7nin)~  ;Cat  old  aun  tina 

7aac  <**  (in_aun  7ninl)  ;6at  aacond  aun  tina 

(taat  (>  7nin  7ninl))  ; Check  if  aun  tiaia  latar 

■> 

(retract  7aac)  ; Delate  aarliaat  aun  tina 

) 

(dafrula  laava_aclipaa  "Check  aatallita  haa  left  earth  ahadow" 
(in_aun  TninJ  ;Oat  in  aun  fact 

7laaFa  <>  (injaclipaa  7nin2)  ;<sat  in  aclipaa  fact 

(taat  (>  7nln~*7nln2 ) )  ;Cback  in  aun  aftar  aclipaa 

•> 

(retract  7laava)  ; Delate  aclipaa  fact 

(aaaart  (aun  Tnin))  ;Stora  tina  laft  ahadow 

) 

(dafrula  flnd_lataat  "Find  aana  data  pointa  and  delate  aarliaat” 
(lataat  7var  7val  7data  7 tin) 

7aarly<-( lataat  7var  7val  7data2  7tln2) 

(taat  (>  7tin  7tin2))  ; Check  for  lataat  tine 

■> 

(ratract  7aarly) 

) 

(dafrula  8olar_calla_cold  "Check  if  aolar  calla  within  liaiita" 


7naw<-(naw  fact) 

(tal  call  7nun  7taap  Tadn) 

(taat  (<  ?tanp  -30)) 

7bad<-( counter  call  7nun  7count) 


7iiaka  aura  rule  haan't  fired 
;Oat  aolar  call  tanp  point 
;  Check  if  below  lower  taiqp 


■> 


(a88art(pt  call  7nun  cold  Tadn)) 
(aaaart  (color_ayatam  taiq>  rad)) 
(aaaart  (color  call  7nun  rad)) 

(bind  ycountar  (•i'  7cottnt  1)) 

(aaaart  (counter  call  7nun  7countar)) 
(retract  7bad) 

(ratract  ?naw) 


; Below  liaiita,  aava  problan 
;iiaka  color  of  talanatry  rad 


;lncrenent  counter 
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(dttfrul*  solar_c*lls_cool  "Check 
?n«w<-(new  fact) 

(tal  call  7nuii  7 tamp  7nln) 

(test  (<  7tai9  0)) 

(taat  (>>  7taiip  -30)) 
7bad<-(countac  call  7nua  7count) 


solar  calls  within  limits" 

;Maka  sura  rula  hasn't  firad 
;Gat  solar  call  tamp  point 
; check  if  above  lower  tes^ 

; Check  if  below  normal  teo^ 


(sssort(pt  call  7num  cool  7mln))  ; Below  limits,  save  problem 

(sssart  (color_systam  tamp  yellow))  ; Color  of  telemetry  red 
(assart  (color  call  7num  yellow)) 

(bind  7count  {+  7count  1))  ; Increment  counter 

(retract  7bad) 

(retract  7new) 

(assert  (counter  cell  7num  7count)) 


(defjnila  solar  cells  warm  "Check  if  solar  cells  within  limits" 


7new<-(new  fact) 

(tel  call  7num  7temp  Tsiin) 

(test  (>  7temp  50)) 

(test  (<■  7teBip  140)) 

7bad<-( counter  cell  7num  7count) 


;Maka  sure  rule  hasn't  fired 
;Get  solar  coll  temp  point 
;  Check  above  noraial  temp 
; Check  below  upper  max  temp 


(^■■•rt(pt  cell  7num  warm  7min))  ;Above  limits,  save  problem 
(assert  (color_system  temp  yellow))  ;Color  telemetry  yellow 
(assert  (color  cell  7num  yellow)) 

(bind  7oount  (<f  7count  1))  ;  Increment  counter 

(retract  7bad) 

(assert  (counter  cell  7num  7count)) 

(retract  7new) 

) 

(defrule  solar_cells_hot  "Check  if  solar  cells  within  limits” 
^M^'inew  fact)  ;Make  sure  rule  hasn't  fired 

(tel  cell  7num  7temp  Tmin)  ;Get  solar  cell  temp  point 

(test  (>  7tenp  140))  ;Check  eUaove  max  temp 

7bad<-( counter  cell  7num  7count) 


(sssert(pt  cell  7num  hot  Tsiin))  ;8ave  problem 

(Bssert  (color_system  tesp  red))  ;lfake  color  of  telemetry  red 

(assert  (color  cell  7num  red)) 

(bind  Teount  (-f  Teount  1))  ;lncresient  counter 

(retract  7naw) 

(retract  7bad) 

(assert  (counter  cell  7num  Tcount)) 

) 

(defrule  bat_volt_too__low  "Check  battery  voltage  within  limits" 
7now<-(naw  fact)  ;Make  sure  rula  hasn't  fired 

(tel  batvolt  7num  7volt  Tmin)  ;Get  battery  voltage  point 

(test  (<  7volt  10))  ;Check  below  siin  volt  range 

7bad<-( counter  batvolt  7num  Tcount) 


(assert(pt  batvolt  Tnum  too-low  7id.n))  ;save  problem 
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(••■•rt  (color_8yst«n  potrar  rad)}  ;Make  color  of  talenatry  red 
(•■■art  (color  batvolt  ?nuin  rad)) 

(bind  7count  (+  ?count  1))  ; Increment  counter 

(retract  7bad) 

(assart  (counter  batvolt  7num  7count) ) 

(retract  7naw) 

(assart  (dec  chack_powar__8ystaffl) ) 

(assart  (dec  racondltlon_battarias ) } 

(assart  (dec  changa_oparatlons ) ) 

) 

(dafrula  bat_volt_low  '‘Check  battery  voltage  within  limits'* 
7naw<-(naw  fact)  ;Maka  aura  rule  hasn't  fired 

(tal  batvolt  7nuffl  7 volt  7min)  ;Get  battery  voltage  point 

(test  (<  7 volt  11.5) >  ; Check  below  min  normal  volt 

(test  (>a  7volt  10))  ;Check  if  above  min  volt 

7bad<-( counter  batvolt  7num  7count) 

-> 

(assert(pt  batvolt  7num  low  7min))  ;Below  limits,  save  problem 
(assert  (color_aystem  potier  yellow))  ; color  of  telemetry  red 
(assert  (color  batvolt  7num  yellow)) 

(bind  7count  (+  7count  1))  ; increment  counter 

(retract  7bad) 

(assert  (counter  batvolt  7nuffl  7count)) 

(retract  7new) 

) 

(defrule  bat__volt_high  "Check  battery  voltage  within  limits" 
7ne%K'>(new  fact)  ;Make  sure  rule  hasn't  fired 

(tel  batvolt  7nua  7voIt  7iiin)  ;<3et  battery  voltage  point 

(test  (>  7volt  13.5))  ; chock  above  max  normal  volt 

(test  (<a  7volt  15))  ;Check  if  below  max  volt 

7bad<-( counter  batvolt  7num  7count) 
a> 

(assort(pt  batvolt  7num  high  7mln))  ;Save  problem 

(assert  (color_system  power  yellow))  ; color  of  tsleisetry  red 

(assert  (color  batvolt  7num  yellow)) 

(bind  7count  {+  7count  1))  ;lncreaMnt  counter 

(retract  7bad) 

(retract  7new) 

(assert  (counter  batvolt  7num  7count)) 

(assert  (dec  trickle  charge_batteries) ) 

) 

(defrule  bat__volt_too_high  "Check  battery  voltage  within  limits" 
7new<-(new  fact)  ;Make  sure  rule  hasn't  fired 

(tel  batvolt  7num  7 volt  7min)  ;Get  battery  voltage  point 

(test  (>  Tvolt  15))  ;Cbeck  above  max  volt  range 

7bad<-( counter  batvolt  7num  7count) 

»> 

( assort (pt  batvolt  7num  too-high  Taiin))  ;Save  problem 
(assert  (color^system  power  red))  ;Nijce  color  of  telemetry  red 
(assert  (color  batvolt  7num  red)) 

(bind  7oount  {+  7eount  1))  ; Increment  counter 

(retract  7bad) 
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(retract  ?naw) 

(aaaart  (counter  batvolt  7nuiB  ?count)) 

) 

(defrule  bat_teiiip_cold  "Check  battery  temp  within  limits" 

?new<-(new~ fact)  ;Make  sure  rule  hasn't  fired 

(tel  battes^  7num  7temp  7min)  ;Get  battery  temp  point 

(test  (<  7temp  -IS))  ;Check  below  min  temp  range 

7bad<-( counter  battemp  7num  7count) 


(aBsart(pt  battemp  7nuffl  cold  7mln));Below  limits,  save  problem 
(assert  (color_system  temp  red))  ;Maka  color  of  telemetry  red 
(assert  (color  battes^  7num  red)) 

(bind  7count  (-i-  7count  1))  ;  increment  counter 

(retract  7bad) 

(retract  7new) 

(assert  (counter  batvolt  7num  7count)) 

) 

(defrule  bat_temp_cool  "Check  battery  temp  within  limits" 

7new<-(new  faetj  ;Nake  sure  rule  hasn't  fired 

(tel  battemp  7num  7te]q>  7iiiln)  ;Get  battery  temp  point 

(test  (<  7temp  -6.7))  ;Check  if  below  normal  temp 

(tost  (»  7temp  -15))  ;Chsck  above  min  temp  range 

7bad<-( counter  battemp  7num  7count) 

«> 

(aasert(pt  battesp  7num  cool  7mln))|Below  limits,  save  problem 
(assert  (eolor_system  tenp  yellow))  ; Color  of  telemetry  yellow 
(assert  (color  battes^  7num  yellow)) 

(bind  7oount  (••■  7count  1))  ; Increment  counter 

(retract  7bad) 

(retract  7new) 

(assert  (counter  battea^  7num  7count) ) 

) 

(defrule  bat_teav)_warm  "Check  battery  tea^  within  limits” 

7new<-(new~' faetj  ;Make  sure  rule  hasn't  fired 

(tel  battemp  7num  7temp  7min)  ;Qet  battery  tea^  point 

(test  (>  7teaip  26.7))  ; Check  if  above  normal  temp 

(test  (<>  7temp  50))  ;Check  below  max  tea^  range 

7bad<-( counter  battemp  7num  ?caunt) 


(asBert(pt  battea^  7num  warm  7ailn) ); Above  liaiits,  save  problem 
(assert  (color^system  teaip  yellow))  ; color  of  teleawtry  yellow 
(assert  (color  battemp  7num  yellow)) 

(bind  7eount  (+  7count  1))  ; Increment  counter 

(retract  ?bad) 

(retract  7new) 

(assert  (counter  batteaip  7num  7count)) 

) 

(defrule  bat_teBip_hot  "Check  battery  temp  within  liaiits" 
7iiSfW<-(Dew~‘ fact!  ;Make  sure  rule  hasn't  fired 

(tel  battemp  7num  7temp  Taiin)  ;Oet  battery  tea^  point 

(test  (>  ?tmmp  50))  ;Check  above  max  temp  range 

7bad<-( counter  battemp  7num  7count) 
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1> 


(a«B«rt(pt  batt«np  7nun  hot  ?min) )  ; Above  limits,  save  problem 
(assert  (color_syatem  temp  red))  ;MaJce  color  of  telemetry  red 
(assert  (color  battes^  7num  red)) 

(bind  7count  (+  7count  1))  ; increment  counter 

(retract  7bad) 

(assert  (counter  battemp  7num  7count) ) 

(retract  7 new) 

(assert  (dec  trickle  charge_batteries) ) 

) 

(defrule  battei:y_current_high 

7new<-(new  fact)  ;Naka  sure  rule  hasn’t  fired 

(tel  batcur  7num  7as^  7min)  ;Get  battery  current 

(test  (>  7aiiip  2)) 

(test  (<■  7amp  5)) 

7bad<>( counter  batcur  7nuffl  7count) 

■> 

(assert  (pt  batcur  7nuffl  high  7mLa)) 

(assert  ( color_system  power  yellow))  ; Color  of  telemetry  yellow 
(assert  (color  batcur  7num  yellow)) 

(bind  7count  ('•■  7count  1))  ; increment  counter 

(retract  7bad) 

(assart  (counter  batcur  7num  7count)) 

(retract  7naw) 

) 

(defrule  battery__current_too_high 
7new<-(new  fact)  ;Make  sure  rule  hasn't  fired 

(tel  batcur  7nuiii  7aBqp  7min)  ;Get  battery  currant 

(test  (>  ?aBip  S)) 

?bad<-( counter  batcur  7num  7count) 

«> 

(assert  (pt  batcur  7num  too_high  Tinin) ) 

(assert  (color^system  power  red))  jMaka  color  of  telesiotry  red 
(assert  (color  batcur  7num  red)) 

(bind  7count  (+  7count  1))  ; Increment  counter 

(retract  7bad) 

(assert  (counter  batcur  7nuffl  7count)) 

(retract  7new) 

) 

(defrule  tx_current_hlgh 

?neir<-(new  fact)  ;Nake  sure  rule  hasn't  fired 

(tel  txcur  7num  7a^>  Tmln)  ;Oet  transmitter  current 

(test  (>  7amp  2)) 

(test  (<«  ?amp  5)) 

7bad<-( counter  txcur  7num  7count) 

■> 

(assert  (pt  txcur  7num  high  7min)) 

(assert  (color_systam  power  yellow) )  ;llake  color  of  telemetry  red 
(assert  (color  txcur  7num  yellow)) 

(bind  7count  {+  7count  1))  ;increment  counter 

(retract  7bad) 

(assert  (counter  txcur  7num  7count)) 
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(r* tract  ?n«w) 


(dafrula  tx_current_too_hlgh 
?na%r<-<n«w  fact) 

(tal  txcur  ?nuiii  ?amp  7inin) 

(taat  (>  ?anp  5)) 

7bad<-( counter  txcur  7num  7count) 


;Malce  sure  rule  hasn't  fired 
;Get  transmitter  current 


(assert  (pt  txcur  7nuffl  too_high  7min)) 

(assert  (color_system  power  red))  ;Make  color  of  telemetry  red 
(assert  (color  txcur  7num  red)) 

(bind  7count  (•»■  7count  1))  ;  increment  counter 

(retract  7bad) 

(assert  (counter  txcur  7num  7count) ) 

(retract  7new) 

) 

(defrule  bus_volt_too_low  "Check  bus  voltage  within  limits" 
7new<-(new  fact)  ;Make  sure  rule  hasn't  fired 

(tel  busvolt  7num  7 volt  7min)  ;Get  bus  voltage  point 

(test  (<  7volt  10))  {Check  if  below  min  volt  range 

7bad<> (counter  busvolt  7nuffl  7count) 

■> 

(assert (pt  busvolt  7num  too-low  7min) )  ;Save  problem 

(assert  (color^system  poirar  red))  ;Make  color  of  telemetry  red 

(assert  (color  busvolt  7num  red)) 

(bind  7eount  (•«•  7count  1))  {Increment  counter 

(retract  7bad) 

(assert  (counter  busvolt  7num  7count)) 

(retract  7new) 

) 

(dafrula  bua_volt_low  "Check  bus  voltage  within  limits" 

7new<-(new  fact)  {Make  sure  rule  hasn't  fired 

(tel  busvolt  7num  7 volt  7mln)  {Get  bus  voltage  point 

(test  (<  7volt  11.5))  {Check  below  min  normal  volt 

(teat  (>•  7 volt  10))  {Check  above  min  volt 

7bad<-( counter  busvolt  7num  7count) 

■> 

(assert(pt  busvolt  7num  low  7mln))  {Below  limits,  save  problem 
(assort  (color^system  power  yellow))  {Telemetry  color  yellow 
(assert  (color  busvolt  7num  yellow)) 

(bind  ?count  (+  7count  1))  {Increment  counter 

(retract  7bad) 

(assort  (counter  busvolt  7num  7count)) 

(retract  7new) 

) 

(defrule  bus_yolt_higb  "Check  bus  voltage  within  limits" 
7ne%r<-(new  fact)  {Make  sure  rule  hasn't  fired 

(tel  busvolt  ?num  7 volt  7mln)  {Get  bus  voltage  point 

(test  (>  ?volt  13.5))  {Check  above  max  normal  volt 

(test  (<»  ?volt  15))  {Check  if  below  max  volt 

7bad<-( counter  busvolt  7num  7count) 
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(•■Mrt(pt  busvolt  7nuin  high  ?mln))  ;Save  problem 

(eaeert  (color_Byetem  povrer  yellow))  ;Color  of  telemetry  yellow 

(assert  (color  busvolt  ?num  yellow)) 

(bind  7count  (+  7count  1))  ; Increment  counter 

(retract  7bad) 

(retract  7new) 

(assart  (counter  busvolt  7num  7count)) 

(assert  (dec  trlckle_charga_buBterles ) ) 

) 

(defrule  bus_volt_too_hlgh  "Check  bust  voltage  within  limits" 
7naw<<-(new  factj  ~  ;Make  sure  rule  hasn't  fired 

(tel  busvolt  7num  7volt  7mln)  ;Get  bust  voltage  point 

(test  (>  7volt  15))  ; Check  above  max  volt  range 

7bad<- (counter  busvolt  7num  7count) 

■> 

( assert (pt  busvolt  7nuffl  too-hlgh  7mln))  ;save  problem 
(assert  ( color_ayatem  power  red))  ;Make  color  of  teleaietry  red 
(assert  (color  busvolt  7num  red)) 

(bind  7count  (+  7count  1))  ; Increment  counter 

(retract  7bad) 

(retract  7new) 

(assert  (counter  busvolt  7num  7count)) 

) 

(defrule  bus^temp^cold  "Check  bus  temp  within  limits" 

?netK-(new'~ factj  ;Make  sure  rule  hasn't  fired 

(tel  bustemp  7num  7tea9  7mln)  ;Get  bus  tfunp  point 

(test  (<  ?temp  -10))  {Check  below  min  temp  range 

?bad<-( counter  bustemp  7num  7count) 

«> 

(asaert(pt  bustenp  7num  cold  7mltt));Save  problem 

(assert  (color_Bystem  temp  red))  ;Make  color  of  telemetry  red 

(assert  (color  bustesip  7num  red)) 

(bind  7count  (+  7count  1))  {Increment  counter 

(retract  7bad) 

(retract  7new) 

(assert  (counter  bustesp  7num  7count) ) 

) 

(defrule  bus_temp_cool  "Check  bus  tea^  within  limits" 

?new<-(new  factj  {Make  sure  rule  hasn't  fired 

(tel  bustenp  7num  7temp  7mln)  {Get  bus  temp  point 

(test  (<  7teiqp  0))  {Check  If  below  normal  temp 

(test  (>«  7twp  -10))  {Check  above  min  tenp  range 

?bad<-( counter  bustemp  7num  7count) 

■> 

(asBort(pt  bustesp  7num  cool  Tmln)) {Below  limits,  save  problem 
(assert  (color_system  tesip  yellow))  {Color  of  telemetry  yellow 
(assert  (color  bustesp  7num  yellow) ) 

(bind  ?cottnt  (-f  7count  1))  {Increment  counter 

(retract  7bad) 

(assert  (counter  bustemp  7num  ?count)) 

) 

(defrule  bus^tempjwarm  "Check  bus  tes^  within  limits” 


7n«w<-(mw  fact)  ;Make  sure  rule  hasn't  fired 

(tel  bustenp  7nuiii  7teii^  7inin)  ;Get  bus  tenp  point 

(test  (>  7teinp  40))  ; Check  if  above  normal  temp 

(test  (<-  7temp  50))  ;Check  if  below  max  temp  range 

7bad<-( counter  bustemp  7num  7count) 

■> 

( assert (pt  bustemp  7num  warm  7min))  ;Save  problem 

(assert  ( color^system  temp  yellow))  ;Nake  color  of  telemetry  red 

(assert  (color  bustemp  7nuffl  yellow)) 

(bind  7count  (■•■  7count  1))  ;  Increment  counter 

(retract  7new) 

(retract  7bad) 

(assert  (counter  bustenp  7num  7count) ) 

) 

(defrule  bus_teiip_hot  "Check  bus  temp  within  limits" 

7ne%f<-(new  fact)  ;Make  sure  rule  hasn't  fired 

(tel  bustemp  7num  7temp  ?min)  ;<Set  bus  tenp  point 

(test  (>  7temp  50))  ;Check  above  max  temp  range 

7bad<-( counter  bustemp  7num  7count) 


( assert (pt  bustenp  7nuffl  hot  Tmin))  ;Save  problem 

(assert  (color_system  temp  red))  ;Make  color  of  telemetry  red 

(assert  (color  bustemp  7num  red)) 

(bind  7count  (>•■  7count  1))  {Increment  counter 

(retract  7bad) 

(retract  7new) 

(assert  (counter  bustenp  7num  7count)) 

) 

(defrule  tx_volt_too__^low  "Check  tx  voltage  within  limits" 

7new<-(new  fact)  {Make  sure  rule  hasn't  fired 

(tel  txvolt  7num  7volt  7mln)  {Get  tx  voltage  point 

(test  (<  7volt  10))  {Check  below  min  volt  range 

7bad<-( counter  txvolt  7num  7count) 


( assert (pt  txvolt  7num  too-low  7min))  {Save  problem 

(assert  (color_8ystem  power  red))  {Make  color  of  telemetry  red 

(assert  (color  txvolt  7num  red) ) 

(bind  7count  (-i-  ?count  1))  {Incremant  counter 

(retract  7bad) 

(assert  (counter  txvolt  7num  7count)) 

(retract  7new) 

(assert  (dec  check_power  system)) 

) 

(defrule  tx_volt_low  "check  tx  voltage  within  limits" 

7ne«K-(new  fact)  {Make  sure  rule  hasn't  fired 

(tel  txvolt  7num  7volt  Tmin)  {Get  tx  voltage  point 

(test  (<  ?volt  11.5))  {Check  below  min  normal  volt 

(test  (>>  7volt  10))  {Check  if  above  min  volt 

7bad<-( counter  txvolt  7num  7count) 


(assert(pt  txvolt  7noffl  low  7mln))  {Below  limits,  save  problem 
(assert  (color_8ystem  power  yellow))  {Color  of  telemetry  yellow 
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(••■•rt  (color  txvolt  ?nuia  yollow) ) 

(bind  ?count  (-i-  7count  1))  ;  Increment  counter 

(retract  7bad) 

(aasert  (counter  txvolt  7nuin  7count)) 

(retract  7naw) 

) 

(defrule  tx_volt_high  “Check  tx  voltage  within  limits" 

7new<-(new  fact)  ;Make  sure  rule  hasn't  fired 

(tel  txvolt  7num  7 volt  7min)  ;Get  tx  voltage  point 

(test  (>  7volt  13.5))  ; Check  above  max  normal  volt 

(teat  (<«  7volt  15))  ; Check  if  below  max  volt 

7bad<-( counter  txvolt  7niua  7count) 

-> 

( assert (pt  txvolt  7num  high  7min))  ; Above  limits,  save  problem 
(assert  (color_sy8tem  po%rer  yellow))  ;Telemetry  color  yellow 
(assort  (color  txvolt  7num  yellow)) 

(bind  7count  (+  7count  1))  ; Increment  counter 

(retract  7bad) 

(retract  7new) 

(aasert  (counter  txvolt  7num  7count)) 

) 

(defrule  tx_volt_too_high  "Check  tx  voltage  within  limits” 

7new<-(new  fact)  ~  ;Make  sure  rule  hasn't  fired 

(tel  txvolt  7num  7volt  7mln)  ;Get  tx  voltage  point 

(teat  (>  7volt  15))  {Check  if  above  max  volt  range 

7bad<'>(  counter  txvolt  7nuffl  7count) 

■> 

( aasert (pt  txvolt  7num  too-high  ?min))  ;Save  problem 

(aasert  (color^system  power  red))  {Make  color  of  telemetry  red 

(assert  (color  txvolt  ?num  red)) 

(bind  7count  (-f  7count  1))  {Incresient  counter 

(retract  7bad) 

(retract  ?new) 

(assert  (counter  txvolt  7num  7count)) 

) 

(defrule  tx_tea9_cold  "Check  transmitter  temp  within  limits" 

7new<-(new  fact)  {Make  sure  rule  hasn't  fired 

(tel  txtemp  7num  7teBqp  7min)  {Get  transmitter  tes^  point 

(teat  (<  7teap  -10))  {Check  if  below  min  temp  range 

7bad<-( counter  txteip  7num  7count) 

■> 

(asaert(pt  txtea^  7num  cold  Tmin))  {Save  problem 

(assert  (color_system  temp  red))  {Make  color  of  telemetry  red 

(assert  (color  txtemp  7num  red)) 

(bind  7count  (+  7count  1))  {Increment  counter 

(retract  7new) 

(retract  ?bad) 

(assert  (counter  txteaqi  7num  7count)) 

(aasert  (dec  transBiit__beacon) ) 

) 

(defrule  tx_teB9_cool  "Check  transmitter  tei^  within  limits" 
7new<-(new  fact)  {Make  sure  rule  hasn't  fired 
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(t«l  txttmp  7nuiii  ?t«iip  7iiiin)  ;G«t  transaltter  twop  point 

(tost  (<  7tmmp  0))  ;Ch«ck  if  below  normal  temp 

(teat  (»  7tmmp  -10))  ;Checlc  above  min  temp  range 

7bad<-( counter  txtemp  7nuffl  7count) 

■> 

(aasert(pt  txtemp  7num  cool  7mln) )  ;Save  problem 
(assert  (color^system  temp  yellow))  ; Color  of  telemetry  red 
(assert  (color  txtemp)  7num  yellow)) 

(bind  7count  (+  7count  1))  ; Increment  counter 

(retract  7bad) 

(retract  7new) 

(assert  (counter  txtemp  7num  7count)) 

) 

(defrule  tx_teii9_warm  "Check  transmitter  tea^  within  limits” 
7new<-(new  fact)  ;)lake  sura  rule  hasn't  fired 

(tel  txtea^  7num  7teiiqp  7min)  ;Get  transmitter  temp  point 

(test  (>  7temp  40))  ; Check  if  above  normal  tei^ 

(teat  (<>  7temp  50))  ;Check  if  below  max  temp  range 

7bad<-( counter  txteiQ)  7num  7count) 


(aasert(pt  txteo^  7num  warm  Tmin))  ;8ava  problem 

(asseirt  (eolor_syatem  temp  yellow))  ;Maka  color  of  telesMtry  red 

(assert  (color  txtemp  7num  yellow)) 

(bind  7cottnt  (••■  7count  1))  ;  Increment  counter 

(retract  7bad) 

(retract  7new) 

(assert  (counter  txtemp  7num  7count)) 

) 

(defrule  tx_taqp_hot  "Check  transmitter  te^p  within  limits* 
7new<-(new  fact)  ;llake  sure  rule  hasn't  fired 

(tel  txtwqp  7num  7temp  7mln)  ;Get  transmitter  tamp  point 

(test(>  7temp  50))  ;Check  above  max  tei^  range 

7bad<- (counter  txtemp  7num  7coant) 


(assart(pt  txtes^  7num  hot  7min))  ;Save  problem 

(assert  (color__system  temp  red))  ;Make  color  of  telemetry  red 

(assert  (color  txtes^  7num  red)) 

(bind  7coont  {*  7count  1))  ; increment  counter 

(retract  7bad) 

(retract  7new) 

(assert  (counter  txtes^  7num  7count)) 

(assert  (dec  switch_txiiltter) ) 

) 

(defrule  rx_temp_cold  "Check  receiver  tai^  within  lioiits” 
7now<-(new  fact)  ;Make  sure  rule  hasn't  fired 

(tel  rxtaaqp  ?num  7teBqp  Tmin)  ;Oet  receiver  temp  point 

(teat  (<  Ttamp  -10))  ;Cheok  below  min  teap  range 

7bad<-( counter  rxtei^  7num  Tcount) 


(aasart(pt  rxtemp  Tnum  cold  Tmin))  jsave  problem 

(assert  (eolor_system  temp  rad))  ;lfake  color  of  tolomet:cy  red 

(assert  (color  rxtei^  7num  red)) 
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(bind  7count  (■»■  ?count  1))  jlncrenant  counter 

(ratract  ?bad) 

(ratract  7naw) 

(assart  (countar  rxtanp  7nuBi  7count)) 

) 

(dafrula  rx__taiip_cool  "Chack  racalvar  taiip  within  llstlts" 

7natK>(naw  fact)  ;Maka  sura  rula  hasn't  fired 

(tal  rxteiip  7nun  7taiip  7Bd.n)  ;Gat  racalvar  tasq?  point 

(tost  (<  7taBqp  0))  ;Chack  if  below  nomal  tanp 

(test  (>•  7tai9  -10))  ; Chack  above  min  tamp  range 

7bad<-( counter  rxtamp  7num  7count) 


(assart(pt  rxtamp  7num  cool  Tmin))  ;sava  problem 

(assart  (color__syatam  temp  yellow))  ; color  of  talasiatry  yellow 

(assart  (color  rxtamp  7num  yellow)) 

(bind  7count  (+  7count  1))  ;Incra8iant  counter 

(ratract  7bad) 

(ratract  ?naw) 

(assart  (counter  rxtamp  7num  7count)) 

) 

(dafrula  rx_tamp_warm  "Check  receiver  tamp  within  lisiits" 
7naw<-(naw  fact)  ;Maka  sura  rula  hasn't  fired 

(tal  rxtaaqp  7num  7tamp  7min)  ;Gat  receiver  tamp  point 

(teat  (>  7tamp  40))  ;Chack  if  above  normal  tamp 

(teat  (<■  ?tmmp  SO))  ;Chack  below  aiax  tamp  range 

7bad<-( counter  rxtamp  7num  7count) 


(asaart(pt  rxtas^  7num  warm  Tmin))  ;Sava  problem 
(assert  (color_,systam  tump  yellow))  ;Color  telemetry  yellow 
(assert  (color  rxtes^  7num  yellow)) 

(bind  Toount  (*  Teount  1))  ; Increment  counter 

(retract  7new) 

(ratract  7bad) 

(assert  (counter  rxtamp  7num  Teount)) 

) 

(dafrula  rx_taaqp__hot  "Check  receiver  tesq^  within  limits" 

7new<-(new  fact)  ;llake  sura  rule  hasn't  fired 

(tel  rxtamp  7num  Ttei^  Tmin)  ;aet  receiver  temp  point 

(test(>  Ttemp  50))  ;Chock  above  max  temp  range 

7bad<-( counter  rxtesqp  Tnum  Teount) 


(assert(pt  rxteiqi  Tnum  hot  Tadn))  ;Save  problem 
(assert  (color_,system  temp  red))  ;Color  of  telesietry  rod 
(assert  (color  rxtamp  Tnum  red)) 

(bind  Teount  (-f  Teount  1))  ;increawnt  counter 

(retract  Tbad) 

(retract  Tnow) 

(assert  (counter  rxtea^)  Tnum  Teount)) 

(assort  (dec  switch  revr)) 

) 

(dafrula  dcs_toi!p_cold  "Chack  dcs  tamp  within  limits" 

7naw<-(naw  fact)  ;llaka  sura  rula  hasn't  fired 
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(t«l  deatMip  ?nuB  ?t«iip  7iiln) 

(t«st  (<  7t«iip  -10)) 

7b«d<- (counter  dcstenp  7xam  7count) 


;G«t  dca  taaq?  point 
;Chack  below  min  temp  range 


(aaaert(pt  dca  7num  cold  7min))  ;8ave  problem 
(aaaert  (color_ayatem  temp  red))  ; Color  of  telemetry  red 
(aaaert  (color  dcatemp  7num  red)) 

(bind  7count  (+  7count  1))  ; Increment  counter 

(retract  7new) 

(retract  7bad) 

(aaaert  (counter  dcatemp  7num  7count) ) 

) 

(defrule  dca_temp_cool  "Check  dca  temp  within  liaiita” 

7new<-(new  fact)  }Maka  aure  rule  haan't  fired 

(tel  dcatemp  7num  7temp  7mln)  ;<3et  dca  temp  point 

(teat  (<  7temp  0))  ;Check  if  below  normal  teiqp 

(teat  (>a  7temp  -10))  ;Check  above  min  temp  range 

7bad<- (counter  dcatemp  7num  7count) 


;  Increment  counter 


( aaaert (pt  dcatemp  7num  cool  Tmin))  ;Save  problem 

(aaaert  (oolor^ayatem  temp  yellow))  ;Color  of  telemetry  yellow 

(aaaert  (color  dcatemp  7num  yellow)) 

(bind  7count  (-f  7count  1))  ;  Increment  counter 

(retract  7bad) 

(retract  7new) 

(aaaert  (counter  dcatemp  7num  7count)) 

> 

(defrule  dea_temp_warm  "Check  dca  taa^  within  limita* 

7new<-(new  fact)  ;llake  aure  rule  haan't  fired 

(tel  dcatei^  7num  7temp  7min)  lOet  dca  temp  point 

(teat(>  7temp  40))  ;Check  if  above  normal  taaip 

(teat(<a  7temp  50))  ;Check  below  max  temp  range 

7bad<-( counter  dcatei^  7num  7count) 

■> 

( aaaert (pt  dcatemp  7num  warm  7min))  ;Save  problem 
(bind  7eount  (•»■  7count  1))  ;lncrement  counter 


(bind  7eount  (•»■  7count  1))  ;lncrement  counter 

(retract  7new) 

(retract  7bad) 

(aaaert  (color__ayatem  temp  yellow))  ; color  of  telemetry  yellow 
(aaaert  (color  dcatei^  7num  yellow)) 

(aaaert  (counter  dcatei^  7num  7count)) 

) 

(defrule  dca_temp_hot  "Check  dca  tei^  within  limita” 

7naw<-(new  fact)  ;liako  aure  rule  haan't  fired 

(tel  dcatemp  7num  7teB9  Tmin)  ;Get  dca  tamp  point 

(teat(>  ?tMip  SO))  ;Check  above  max  tamp  range 

7bad<-( counter  dcateiQ)  7num  Tcount) 


(aaaert(pt  dcatmnp  7num  hot  Tmin)) 
(aaaert  (eolor_ayatem  teiq>  red)) 
(aaaert  (color  dcateiqp  7num  red)) 
(bind  Tcount  (+  Tcount  1)) 


;Save  problem 
;  Color  of  tel< 


itry  red 


I Increment  counter 
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(rtttraot  7bad) 

(ratraet  ?naw) 

(aaaart  (counter  dcatenp  7nuB  7coant}) 

(aaaert  (dec  8witch_dcs)) 

) 

(defrule  edacseu_counter  "Check  on  the  frequency  of  aeu  in  cpu." 
(tel  edacaeucount  7nuia  7count  7iiiin)  ;Flnd  edac  counter 
(teat  (>  7count  1))  ;Teat  if  greater  than  liatit 

«> 

(aaaert  (dec  Increaae  raBiwa8h_frequency) )  ;Save  declaion 

) 

(defrule  worat_ca8e_8yaten  "Save  %«or8t  colora  for  ayatem" 

(color^ayaten  7ayateiD  red)  ;Find  caae  where  ayatem  ia  red 

7bettar  <>  (color_ayatem  7ayatam  yellow) ;Flnd  ayatem  ia  yellow 

m> 

(retract  7better)  ; Delate  yellow  caae 


(defrule  worat_caae_tel_pt  "Find  colora  for  telemetry  and  nave” 

(color  7telpt  7num  red)  ;Find  where  telemetry  red 

7better  <-  (color  7telpt  7num  yellow)  ;Find  telemetry  yellow 
a> 

(retract  7botter)  ; Delete  yellow  caae 

) 

(defrule  initlallzejoccureneejproblai  "Start  algorithm  to  find  first 
oocurenea  of  problM  per  orbit" 

(pt  7telpt  7num  7prob  7min)  ;aiet  telemetry  problem 

(aun  7tlm)  iciet  time  leaving  eclipse 

(test  (>•  Tmln  7tlm))  make  time  before  problem 

■> 

(bind  7after  (-  Tmln  7tim))  /Determine  when 

(assert  (flrstims  Ttelpt  7num  7prob  Tmln  Tafter))  /Hake  first 
) 

(defrule  find_flrst_ooeurence  "Find  the  first  tlaie  that  a  problem 
occurred"  ”  ” 

(firstlme  Ttelpt  7num  7prob  7min  Tafter)  ;Get  firstime  fact 
Tsec  <-  (firstime  Ttelpt  Tnum  Tprob  Tminl  7afterl);0et  second 
(sun  Ttims)  /Find  time  left  eclipse 

(test  (<  Tmln  Tminl))  /Check  first  is  earlier 

(test  (>  Tmln  Ttime))  /Check  first  after  eclipse 

(test  (>  Tminl  Ttime))  /Check  second  after  eclipse 

■> 

(retract  Tsec)  /Delete  later  fact 

) 

(defrule  inltlalize_hlgh_and_lowjorblt  "Find  high  and  low  values" 

(tel  Tver  Tval  Tdata  Ttlm)  "  /Get  telemetry  point 
(sna  Ttiml)  /Find  if  left  eclipse 

(test  (>■  Ttlm  TtizU))  /Check  tel  pt  after  eclipse 

(tel  “not  Tnum  Tprob  Tzdn)  /Do  not  find  high  value  for 

(tel  “edaoseutims  Tnum  Tprob  Tmln)  /counters 
(tel  “unanthatt  Tnum  Tprob  Tmin) 

(tel  “authlogins  Tnum  Tprob  Tmln) 

(tel  “attenaet  Tnum  Tprob  Tmin) 
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(t«l  "•dacaaucountatart  7nuai  7prob  7nin) 

(tal  **iuilifaah  7nun  7prob  Tailn) 

(tal  'poolbuffara  7nuai  7prob  Taiin) 

(tal  ~adacaaucount  7nuBi  7prob  Taiin) 

(tal  "varaat  Tnun  7prob  Taiin) 

(tal  ~deaaat  Tnuai  7prob  Taiin) 

(tal  'aicxlaaat  Tnuai  Tprob  Taiin) 

(tal  "tsaat  Tnun  Tprob  Taiin) 

(tal  “rxaat  Tnum  Tprob  Taiin) 

(tal  'atoragauaad  Tnuai  Tprob  Taiin) 

(tal  “aantaail  Tnua  Tprob  Taiin) 

(tal  'rxdaiail  Tnuai  Tprob  Tadn) 

(tal  "atoradBail  Tnuai  Tprob  Taiin) 

(tal  ~loglna  Tnuai  Tprob  Tadn) 

(tal  ~logouta  Tnuai  Tprob  Taiin) 

(tal  njinim  Tnuai  Tprob  Taiin) 

(tal  'FRMRnuai  Tnuai  Tprob  Taiin) 

(tal  ~UJlnuai  Tnuai  Tprob  Taiin) 

(tal  "SABMnuai  Tnuai  Tprob  Tadn) 

(tal  “KBJnuai  Tnim  Tprob  Tadn) 

(tal  'DMnuai  Tnim  Tprob  Tadn) 

(tal  "lontnuai  Tnuai  Tprob  Tadn) 

(tal  'Discnuai  Tnum  Tprob  Tadn) 

(tal  ~iuuioai  TnuB  Tprob  Tadn) 

(tal  “inuBi  Tnuai  Tprob  Tadn) 

(tal  ''dataout  Tnuai  Tprob  Tain) 

(tal  “datain  Tnim  7pr<d3  Tadn) 

(tal  'uptiaM  Tnuai  Tprob  Tadn) 

■> 

(aaaart  (high  ?var  Tval  Tdata  Ttiai))  ;lnitialiaa  high  par  orbit 
(aaaart  (highast  Tvar  Tval  Tdata  Ttlai))  ;Znitializa  higbaat 
(assart  (low  Twar  Tval  Tdata  Ttiai))  ;lnitializa  low  par  orbit 
(aaaart  (lowaat  Tvar  Tval  Tdata  Ttia))  ;Znitializa  lowaat 

) 

(dafrula  flnd_highjorbit  "Find  tba  bighaat  valua  par  orbit  of  aach 

talaaatry  point” 

(high  Tvar  Tval  Tdata  Ttiai)  ;aat  a  high  fact 

Tlowar  <-  (high  Tvar  Tval  7data2  7tiBi2);Gat  a  aacond  high  fact 
(taat  (<>  Ttiai  7tiai2))  ;Chack  not  the  saaM 

(taat  (>■  Tdata  7data2))  ;Chack  firat  ia  higher 

■> 

(retract  Tlowar)  ; Delate  aacond  fact 

) 

(dafrula  find_hlghaat  "Find  the  highaat  valua  in  the  file  for  aach 

talaaatry  point” 

(highaat  Tvar  Tval  Tdata  Ttiai)  ;Oat  a  highaat  fact 

Tlowar  <-  (highaat  Tvar  Tval  7data2  7tiai2)  ;<3at  aacond  highaat 
(taat  (<>  Ttiai  Ttiad))  ;Chack  facta  not  the  aaaia 

(taat  (>•  Tdata  7data2))  7Chack  firat  fact  la  higher 

■> 

(retract  Tlowar)  ; Delate  aacond  fact 


(d«frul«  find_low_orbit  "Find  th«  lowast  valua  par  orbit  of  aach 
talaMtry  point"  ~ 

7lo«iar  <-  (low  7var  7val  7data  7ti]B)  ;Gat  a  low  fact 
7hlghar  <-  (low  7var  7val  7data2  7tlB2)  ;Gat  a  sacond  low  fact 
(taat  (<>  7tiin  7tl]ii2))  ;Chaclc  facta  not  tha  aaaia 

(taat  (<■  7data  7data2))  ;Chac)c  first  is  lotrar 


(ratract  7highar) 


;Oalata  sacond  fact 


(dafrula  find^lowast  "Find  tha  lowast  walua  of  each  telemetry  point* 
(lowest  7var  7val  7data  7tlm)  ;Gat  a  low  fact 

7highor  <-  (lowast  7var  7val  7data2  7tim2)  ;Gat  second  low  fact 

(test  (<>  7tia  7tliii2))  ; Check  not  tha  same 

(test  (<«  7data  7data2))  ;Chack  first  fact  is  lower 


(retract  7highar) 


; Delate  sacond  fact 


(dafrula  chack__configuratlon  "Cheek  to  ensure  spacecraft  configxiration 
la  tha  aasia  as  tha  ground  station  expects" 

(oonfig  7aat  7val)  ;Oat  configuration  fact 

(tel  7aet  7num  7act  7tiao)  ;Qat  talaaatry  fact 

(test  (<>  7val  7act))  ;Chack  settings  are  saaie 

■> 

(assert  (pt  7set  7nua  not  configured  7tisia))  ;config  error 

) 

(dafrula  dal^conflg 

((tone-reading)  ;llo  more  data 

7eon<-(config  7set  7Fal)  joev  config  fact 

■> 

(retract  7con)  ; Delete  config  fact 

) 

(dafrula  <iel_high 

(done-reading)  ;llo  s»re  data 

7hi<-(high  7point  7nua  7data  7ti«M);get  high  fact 

■> 

(retract  7hi)  ;Delete  high  fact 

f 

(dafrula  clel_low 

((tone-reading)  ;No  more  data 

7lo<-(low  7point  7nun  7data  7tim);(tot  low  fact 

■> 

(retract  7lo)  ; Delete  low  fact 

) 

(dafrula  constant_out_counter 

(pt  ?var  ?num  7prob  7tlBi)  ;Flnd  problem  fact 
(not  (done-reading))  ;lfore  data 

(not  (countjout  Tver  7num  7count))  ; problem  does  not  have  count 
■>  ~ 

(assert  (oount^out  7var  ?num  0));8tart  counter 


(dafrula  out_count 
7next<-(next  7var  7num) 


;aet  next  fact 
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?oldcnt<-(count_out  7var  ?nun  7count);Zf  counter,  increment 

■> 

(bind  7count  {*  7count  1)) 

(assert  (count_out  7var  7num  7count)) 

(retract  7oldcnt) 

(retract  7naxt) 

) 

(defrule  checkjcounta 

(done-reading)  ;No  siore  data 

7cnt<-(count_out  7var  7num  7count);Get  count  since  bad 
(counter  7var  7num  7countbad) ;aet  count  out  of  limits 
(test  (-  7eount  7countbad) )  ;See  if  sssia 


(retract  7cnt)  ; Delete  old  count  fact 

(assert  (problem  7var  7nuffl  constantly  out  limits)) 

) 

(defrule  not_always_out 

(done-reading)  ;Mo  more  data 

7cnt<-(count_out  7var  7num  7count);Get  count  since  bad 
(counter  7var  7num  7countbad) }Get  count  out  of  limits 
(test  (<>  7eount  7countbad) );8ee  if  not  same 


(retract  7cnt) 

) 

(defrule  del__next 

(done-reading)  ;No  more  data 

7next<-(next  7var  7num)  ;aet  next  fact 


(retract  7next)  ; Delete  next  fact 

) 

(defrule  save_flrst_problems  "Save  problems  found  in  teleawtry” 
(done-reading)  ;rlnd  if  data  files  open 

7prob<-(pt  7val  7data  7tim)  ;aet  problem  fact 

7when<-(firstlBw  7var  7val  7data  7tim  7after) 


■> 


(printout  problems  Tver  "  ~  7val  "  "  7data  "  "  7tim  "  occured  first 
tiaw  at  "  7after  "  seconds  after  eclipse”  crlf)  ;Send  file 
(retract  7prob) 

(retract  Tvhen) 

) 

(defrule  savo_problema  "Save  problems  found  in  telemetry” 
(done-reading)  ;rind  if  data  files  open 

7prob<-(pt  7var  7val  7data  7tim)  ;Oet  problem  fact 
(not  (flrstims  7var  7val  7data  7tim  7after)) 


(printout  problems  7var  ”  ”  7val  ”  ”  7data  ”  ”  7tim  crlf) 
(retract  7prob) 

) 

(defrule  savejdeciaions  "Save  decisions  determined  by  rules” 
(dene-reading)  ;Find  if  data  files  open 

7deeide<-(dec  $7dec)  }Oet  decision  fact 
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(printout  dacido  7dac  crlf) 
(ratract  ?dacida) 


;Sand  to  dacision  file 


(dafrula  8ava_tala]Datry_colora  "save  colors  detarminad  by  rules' 
(dona-reading)  ;Find  if  data  files  open 

7col<-(color  7var  7num  7color)  ;Gat  color  fact 

■> 

(printout  colors  7var*‘  *'7nuin‘*  **7color  crlf)  ;Sand  color  file 
(ratract  7col) 

) 

(dafrula  sava_8y8tam_colors  "Sava  colors  datennined  by  rules" 
(dona-raading)  ;Find  if  data  files  open 

7col<-(color_systam  7sys  7color)  ;Gat  color  fact 

■> 

(printout  colorsys  7sy8"  "7color  crlf)  ;Sand  system  color  file 
(ratract  7col) 

) 

(dafrula  sava_hi_and_low_data  "Sava  high  and  low  per  orbit  data 
7aarly<-(sun  7tiiiia)  ;Gat  sun  time 

(sun  7tl]Ba2)  ;Gat  second 

(test  (<  7tiBia  7tiBia2))  jOatarmina  earliest 

7callhil<-(high  call  1  7dl  7tinl) 

7callhi2<-(high  call  2  7d2  7tlB2) 

7callhl3<-(high  call  3  7d3  7tiBi3) 

7callhi4<-(high  call  4  7d4  7tia4) 

7oallhlS<-(high  call  5  7d5  7tiait5) 

7eallhi6<-(hlgh  call  6  7d6  7tin6> 

7eallbi7<-(hlgh  call  7  7d7  7tim7) 

7eallhi8<-(bigh  call  8  7d8  ?tln8) 

7callhi9<-(bigh  call  9  ?d9  7tlBi9) 

7callhll0<-(high  call  10  7dl0  7tiBl0) 

7callhill<-(high  call  11  7dll  ?tlmll) 

7callhil2<-(hlgh  cell  12  7dl2  ?tial2) 

7callhil3<-(hlgh  call  13  7dl3  7tiBl3) 

7callbil4<-(hlgh  call  14  7dl4  7tiinl4) 

7callbilS<-(blgb  call  15  7dlS  7tiBlS) 

7callbil6<-(bigb  call  16  7dl6  7tial6) 

7callbil7<-(blgb  call  17  ?dl7  ?tlml7) 

7battbil<-(hlgb  battamp  1  7dl8  7tlBil8) 

7battbi2<-(blgb  battamp  2  7dl9  ?tlml9) 

7batvbll<-(bigb  batvolt  1  7d20  ?tia20) 

7batvbi2<-(bigb  batvolt  2  ?d21  7tim21) 

7batibll<-(bigb  batcur  1  7d22  7tim22) 

7batibi2<-(bigb  batcur  2  7d23  7ti]B23) 

7txtbil<-(Ugb  txtaiq)  1  7d24  7tim24) 

7txtbi2<-<bigb  txtamp  2  7d25  7tlm2€) 

7rxtbil<-(bigb  rxtaiqp  1  7d26  7tim26) 

7rxtbi2<-(bigb  rxtaag)  2  7d27  7tiii27) 

7bttstbll<-(bigb  buatamp  1  7d28  7tim28) 

7basvbil<-(bigb  basvolt  1  7d30  7tiB30) 

7oalllol<-(low  call  1  7d32  7tlm32) 

7oalllo2<-(low  call  2  7d33  7tlm33) 


7c«lllo3<-(low  c«ll  3  ?d34  ?tijn34) 

?e«lllo4<-<law  call  4  ?d35  7tlm3S) 

7c«lllo5<-(low  call  5  7d36  7ti]ii36) 

7calllo6<-(low  call  6  7d37  7tim37) 

7calllo7<-(low  call  7  7d38  7tJjn38) 

7calllo8<-(low  call  8  7d39  7tliii39) 

7calllo9<-(low  call  9  7d40  7tiia40) 

7calllolO<-(low  call  10  7d41  7tlm41) 

7callloll<-(low  call  11  7d42  7tlm42) 

7calllol2<-<low  call  12  7d43  7tijn43) 

7calllol3<-(low  call  13  7d44  7tim44) 

7calllol4<-(low  call  14  7d45  7tlB45) 

7calllolS<-(law  call  15  7d46  7tlii46) 

7calllol6<-(low  call  16  7d47  7tiB47) 

7calllol7<-(low  call  17  7d48  7tla48) 

7battlol<-(iow  battai^  1  7d49  7tijii49) 

7battlo2<-(low  battai^  2  7dS0  7tiai50) 

7batvlol<-(low  batvolt  1  7d51  7tiai51) 

7b«tvlo2<-(low  batvolt  2  7d52  7tiai52) 

7batllol<-(low  batcur  1  7d53  7ti]ii53) 

7batllo2<-(low  batcur  2  7dS4  7tlB54) 

7txtlol<-(low  txtamp  1  7dS5  7tij[iS5) 

7txtlo2<-(low  txtanp  2  7dS6  7tiaiS6) 

7rxtlol<-(low  rxtanp  1  7d57  7tiii57) 

7rxtlo2<-(lov  rzt«q>  2  7d58  7tiJB58) 

7bustlol<-(low  bttstaii^  1  7d59  7tlii59) 

7buavlol<-(law  busvolt  1  7d61  7tiai61) 

■> 

(printout  hlvala  7tiaa”  "7dl"  •7d2“  •7d3"  •7d4"  ••7d5“  "7d6"  •7d7" 

"7d8"  •7d9*  "7dl0"  "7dll"  •7dl2«  -7dl3"  "7dl4"  •7dl5"  •) 

(printout  hlvala  7dl6"  "7dl7*  ••7dl8*  •7dl9"  -7d20"  "7d21"  -7d22" 

-7d23"  -7d24-  "7d25-  -7d26"  -7d27-  •7d28-  -7d30  crlf) 

(ratraot  7callhll)  (ratraot  7oallhl2)  (ratract  7callhl3) 

(ratraot  7callhl4)  (ratract  7callhl5)  (ratract  7callhl6) 

(ratract  7callhl7)  (ratract  7callhl8)  (ratract  7callhl9) 

(ratraot  7callbll0)  (ratract  7callhill)  (ratract  7callbll2) 

(ratract  7callhll3)  (ratract  7callhll4)  (ratract  7callbll5)  (ratract 
7callhll€)  (ratract  7callhll7)  (ratract  7batthll)  (ratract  7batthl2) 
(ratraot  7batvhll)  (ratract  7batvhl2) 

(ratract  7batlhll)  (ratract  7batihl2)  (ratract  7txthll) 

(ratraot  7txtbl2)  (ratract  7rxthll)  (ratract  7rztbl2) 

(ratraot  7buBthll)  (ratract  7btts^^l) 

(printout  lovala  7ti«a-  "7d32-  •7d33"  "7d34"  ■7d35"  -7d36"  "7d37- 
"7d38“  "7d39"  "7d40"  •7d41"  "7d42"  "7d43"  •'7d44"  "7d45"  "7d46"  "7d47" 
"7d48"  *7d49*  "7d50"  ■7d51"  "7d52«  •) 

(printout  lovala  7d53"  "7d54"  •7d55"  "7d56"  ■7d57"  "7d58"  -7d59"  "7d61 
crlf)  ;8and  to  data  fllo 

(ratraot  7oalllol)  (ratract  7calllo2)  (ratract  7calllo3) 

(ratraot  ?oalllo4)  (ratract  7oalllo5)  (ratraot  ?oalllo6) 

(ratract  7oalllo7)  (ratract  7oalllo8)  (ratraot  7oalllo9) 

(ratract  7calllol0)  (ratraot  7callloll)  (ratraot  7oalllol2) 


(ratract  ?calllol3)  (ratract  ?calllol4)  (retract  7calllol5)  (retract 
?celllol6)  (ratract  7calllol7)  (retract  7battlol)  (retract  7battlo2) 
(retract  7batvlol)  (retract  7batvlo2) 

(retract  7batllol)  (ratract  7batllo2)  (retract  7txtlol) 

(retract  7txtlo2)  (retract  7rxtlol)  (retract  7rxtlo2) 

(retract  7bustlol)  (retract  7buavlol)  (retract  7early) 

) 

(defirule  8ave_tela]netry_data 

(done-reading)  ;Flnd  if  data  files  open 

(not  (count_out  7var  7num  7count))  ; constant  out  done 
7cellhil<-( highest  cell  1  7dl  7tinl) 

7callhl2<-(  highest  cell  2  7d2  7tliii2) 

7cellhi3<-(  highest  cell  3  7d3  7ti]n3) 

7cellhi4<-( highest  cell  4  7d4  7tin4) 

7cellhl5<-(  highest  cell  5  ?d5  7tiBi5) 

?cellhi6<-(  highest  cell  6  7d6  7tiai6) 

7cellhi7<-(  highest  cell  7  7d7  ?tisi7) 

?cellhi8<-(  highest  cell  8  7d8  7tiiD8) 

7cellhi9<-( highest  cell  9  7d9  7tis9) 

?callhilO<-(hlghest  cell  10  7dl0  7ti]nl0) 

?eellhlll<-( highest  cell  11  ?dll  7tiall) 

?cellhil2<-< highest  call  12  7dl2  7tial2) 

7cellhil3<-(highest  cell  13  7dl3  ?tial3) 

7eellhll4<-( highest  cell  14  ?dl4  ?tial4) 

7eellhil5<-( highest  cell  IS  7dl5  FtialS) 

7cellhll8<-( highest  cell  16  7dl6  7tinl6) 

7eellhil7<-( highest  cell  17  ?dl7  ?tinl7) 

?batthil<-( highest  battenp  1  7dl8  ?tiB>18) 

7batthl2<-(  highest  battasqp  2  7dl9  7tiail9) 

7batvhil<'-(  highest  batvolt  1  7d20  7tiai20) 

7batyhi2<-(  highest  batvolt  2  7d21  7tlBi21) 

7batlhil<-( highest  batcur  1  7d22  7tiin22) 

7batihi2<-( highest  batcur  2  7d23  7tiai23) 

7txthll<-( highest  txtemp  1  7d24  7tifli24) 

7txthl2<-(  highest  txtvap  2  7d25  7tiia26) 

7rxthil<-(  highest  rxtemp  1  7d26  7tiBi26) 

7nitlii2<-(  highest  rxtemp  2  7d27  7tijn27) 

7l9usthil<-( highest  bustesqp  1  7d28  7tiin28) 

7busvhil<-( highest  busvolt  1  7d30  7tim30) 

7celllol<-(  lowest  cell  1  7d32  7tiai32) 

7oelllo2<-(  lowest  cell  2  7d33  7tlai33) 

7oelllo3<-(  lowest  cell  3  7d34  7tiai34) 

7celllo4<-(  lowest  cell  4  7d35  7tiii35) 

7celllo5<-(  lowest  cell  5  7d36  7ti8>3€) 

7celllo6<-( lowest  cell  6  7d37  7tim37) 

7celllo7<-(  lowest  cell  7  7d38  7tiBi38) 

7eelllo8<-( lowest  cell  8  ?d39  7tiB39) 

7celllo9<-( lowest  cell  9  7d40  7tim40) 

7eelllol0<-( lowest  cell  10  7d41  7tim41) 

7oellloll<-( lowest  cell  11  7d42  7tim42) 

7eelllol2<-(loi«est  cell  12  7d43  7tim43) 

7oelllol3<-( lowest  cell  13  7d44  7tiai44) 
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7c«lllol4<-(lowttat  call  14  7d45  7tiffl45) 
7calllol5<-(lowast  call  IS  7d46  7ti]n46) 
7calllol6<-(lowa8t  cell  16  7d47  7tia47) 
7celllol7<-(lovrast  call  17  7d48  7ti]n48) 
7battlol<-( lowest  battemp  1  7d49  7tim49) 
7battlo2<-( lowest  battanp  2  7d50  7tlm50) 
7batvlol<-( lowest  batvolt  1  7d51  7tjjn51) 
7batvlo2<-(lo«rest  batvolt  2  7dS2  7tiffl52) 
7batllol<-( lowest  batcur  1  7dS3  7tiffl53) 
7batllo2<-(  lowest  batcur  2  7dS4  7ti]n54) 
7txtlol<-( lowest  txtenp  1  7d55  7tim5S) 
7txtlo2<-( lowest  txtemp  2  7d56  7tia56) 
7rxtlol<-(  lowest  rxtenp  1  7d57  7ti]n57) 
7rxtlo2<-(lo%rest  rxtemp  2  7dS8  7ti]aS8) 
7bustlol<-(lo«fest  bustemp  1  7d59  7tlm59) 
7busvlol<-(lotfest  busvolt  1  7d61  7tlffl61) 
7callcntl<-( counter  cell  1  7de32) 
7callcnt2<-( counter  cell  2  7dc33) 
7cellcnt3<-( counter  cell  3  7dc34) 
7cellcnt4<-( counter  call  4  7dc3S) 
7callcnt5<-( counter  cell  5  7dc36) 
7cellcnt6<-( counter  cell  6  7dc37) 
7cellcnt7<-( counter  cell  7  7dc38) 
7eallcnt8<‘-( counter  call  8  7'lc39) 
?collcnt9<-( counter  cell  9  7dc40) 
7cellcntl0<>( counter  cell  10  7dc41) 
?cellcntll<> (counter  cell  11  7dc42) 
?cellcntl2<>- (counter  call  12  7dc43) 
7cellcntl3<->(  counter  call  13  7de44) 
7cellcntl4<-( counter  cell  14  7dc45) 
7cellcntl5<-( counter  cell  15  7dc46) 
?cellcntl6<'-(  counter  cell  16  ?dc47) 
7cellcntl7<-( counter  cell  17  7dc48) 
7battcntl<-( counter  battemp  1  7dc49) 
7battcnt2<-( counter  batten^)  2  7dcS0) 
7batvcntl<-( counter  batvolt  1  7dcSl) 
7batvent2<-( counter  batvolt  2  7dc52) 
7baticntl<-( counter  batcur  1  7dc53) 
7batlcnt2<-( counter  batcur  2  7dc54) 
7txtcntl<-( counter  txteiq)  1  7dc55) 
7txtcnt2<-( counter  txtenp  2  7dc56) 
?rxtcntl<-( counter  rxteqp  1  7dc57) 
7rxtcnt2<>( counter  rxtenp  2  7dc58) 
7bustcntl<-( counter  bustei^  1  7dc59) 
?baBvcntl<-(cotinter  busvolt  1  ?dc61) 

?ce' llastl<-(  latest  call  1  7dl32  7ti]ndl32) 
?C£  ast2<-( latest  cell  2  ?dl33  7tiffidl33) 

?cex  ..ast3<>(  latest  cell  3  7dl34  7tiiBdl34) 
7celllast4<-( latest  cell  4  ?dl35  7tlndl35) 
7oelllast5<-( latest  cell  5  7dl36  7tindI36) 
7eelllast6<>( latest  cell  6  7dl37  7tiadl37) 
?oelllast7<>( latest  cell  7  7dl38  ?tlmdl38) 
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?c«lll**t8<-( latest  call  8  7dl39  ?tiindl39) 

?oalllast9<~(  latest  call  9  7dl40  7ti]ndl40) 

7celllaatl0<-(  latest  cell  10  7dl41  7tiindl41) 

7celllastll<-( latest  cell  11  7dl42  7tiindl42) 

7celllastl2<-(  latest  call  12  7dl43  7tliiidl43) 

7celllastl3<-( latest  cell  13  7dl44  7tlndl44) 

7celllastl4<-( latest  cell  14  7dl4S  7tindl45) 

7celllastl5<-(  latest  cell  IS  7dl46  7ti]iidl46) 

7celllastl6<-(  latest  cell  16  7dl47  7tliiidl47) 

7celllastl7<-( latest  cell  17  7dl48  ?tiadl48) 

7battlastl<-< latest  battemp  1  7dl49  7timdl49) 

7battlast2<-(  latest  battemp  2  7dl50  7ti]iidl50) 

7batvlastl<-( latest  batvolt  1  7dl51  7tlindl51) 

7batvlast2<-( latest  batvolt  2  7dl52  7timdl52) 

7batilaatl<-(  latest  batcur  1  7dl53  7tijiidl53) 

7batJklast2<-(  latest  batcur  2  7dl54  7tlffldl54) 

7txtlaatl<-( latest  txtemp  1  7dl55  7tiffldl55) 

7txtlast2<-( latest  txtemp  2  7dl56  7tlffldl56) 

7rxtlastl<-( latest  rxtemp  1  7dl57  7timdl57) 

7rxtlast2<-( latest  rxtemp  2  7dlS8  7tiBidlS8) 

7buatlaatl<-( latest  bustamp  1  ?dl59  7tlmdlS9) 

7busvlaatl<-(  latest  busvolt  1  ?dl61  7tiindl61) 

■> 

(printout  teldata  7dl"  "7d32"  •?dc32"  "7dl32  crlf  7d2»  ••?d33"  '•7dc33" 
"7dl33  crlf  ?d3"  "?d34"  ") 

(printout  teldata  ?dc34”  "7dl34  crlf  7d4"  "?d35"  "7dc35"  "7dl35  crlf 
7d5"  -?d36-  -7dc36"  "7dl36) 

(printout  teldata  crlf  7d6"  •7d37»  •7dc37"  "7dl37  crlf  7d7"  "7d38" 
•7dc38"  "7dl38  crlf  7d8-  -7d39) 

(printout  teldata  "  "7dc39"  "7dl39  crlf  7d9"  •7d40"  "7dc40"  "7dl40 
crlf  7dl0"  *7d41"  "7dc41«  "7dl41) 

(printout  teldata  crlf  7dll"  •7d42*  "7dc42"  "7dl42  crlf  7dl2" 

•7d43"  -7dc43«  *7dl43  crlf  7dl3"  «7d44) 

(printout  teldata  "  "7dc44"  ''7dl44  crlf  7dl4"  "7d45"  "7dc45"  "7dl45 
crlf  7dl5"  "7d46"  "7dc46"  "7dl46  crlf  ) 

(printout  teldata  7dl6"  "7d47"  "7dc47’*  "7dl47  crlf  7dl7"  "7d48" 
"7dc48"  "7dl48  crlf  7dl8"  "7d49"  ") 

(printout  teldata  7dc49"  "7dl49  crlf  dl9"  "7d50"  "7dc50"  "7dl50  crlf 
7d20«  "7d51-  "7dc51"  -7dl51  crlf) 

(printout  teldata  7d21"  «7d52"  ’•7dc52"  "7dl52  crlf  7d22"  "7d53" 
"7dc53"  "7dil53  crlf  7d23"  "7d54"  *) 

(printout  teldata  7dc54"  "7dl54  crlf  7d24"  "7d55"  "7dc55"  "7dl55  crlf 
7d25-  -7d56-  -7dc56”  -7dlS6  crlf  ) 

(printout  teldata  ?d26"  -7d57"  "7dc57"  "7dl57  crlf  7d27"  "?d58" 
*7dc58"  *7dl58  crlf  7d28  "  ••7d59"  ") 

(printout  teldata  7dc59"  ■7dl59  crlf  7d30"  "7d61"  "7dc61"  -7dl61 
crlf) 

(retract  7cellhil)  (retract  7cellbl2)  (retract  7cellhi3) 

(retract  7cellhl4)  (retract  7cellhl5)  (retract  ?callhl6) 

(retract  ?cellhl7)  (retract  ?cellblS)  (retract  7callhl9) 

(retract  ?oellhll0)  (retract  ?cellhlll)  (retract  7cellhil2)  (retract 
?cellhil3)  (retract  7cellhll4)  (retract  7cellhll5)  (retract 
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?callhll6)  (retract  7cellhil7)  (retract  ?batthil)  (retract  ?batthl2) 
(retract  ?batvhil)  (retract  ?batvhl2) 

(retract  7batlhll)  (retract  7batihl2)  (retract  7txthll) 

(retract  7txthi2)  (retract  7rxthll)  (retract  7rxthi2) 

(retract.  7buathil)  (retract  7buevhll)  (retract  7celllol) 

(retract  7calllo2)  (retract  7celllo3)  (retract  7celllo4) 

(retract  7celllo5)  (retract  7celllo6}  (retract  7calllo7) 

(retract  7celllo8)  (retract  7celllo9)  (retract  7celllol0)  (retract 

7callloll)  (retract  7celllol2)  (retract  7celllol3)  (retract 
7calllol4)  (retract  7celllol5)  (retract  7celllol6)  (retract 
7celllol7)  (retract  7battlol)  (retract  7battlo2) 

(retract  7batvlol)  (retract  7batvlo2)  (retract  7batilol) 

(retract  7batllo2)  (retract  7txtlol)  (retract  7txtlo2) 

(retract  7rxtlol)  (retract  7rxtlo2)  (retract  7buetlol) 

(retract  7bU8vlol)  (retract  7cellcntl)  (retract  7cellcnt2) 

(retract  7cellcnt3)  (retract  7cellcnt4)  (retract  7cellcnt5)  (retract 

7cellcnt6)  (retract  ?cellcnt7)  (retract  7cellcnt8)  (retract 
7cellcnt9)  (retract  7callcntl0)  (retract  7cellcntll)  (retract 
7cellcntl2)  (retract  7cellcntl3)  (retract  7cellcntl4) 

(retract  7callcntlS)  (retract  7cellcntl6)  (retract  7cellcntl7) 

(retract  7battcntl)  (retract  7battcnt2)  (retract  7batvcntl)  (retract 

7batvcnt2)  (retract  7batlcntl)  (retract  7batlcnt2)  (retract  7txtcntl) 

(retract  7txtcnt2)  (retract  7rxtcntl) 

(retract  7rxtcnt2)  (retract  7bttstcntl)  (retract  7bu8vcntl)  (retract 
7cellla8tl)  (retract  7celllaat2)  (retract  7cellla8t3)  (retract 

7cellla8t4)  (retract  7celllaat5)  (retract  7eellla8t6)  (retract 

?cellla8t7)  (retract  7eellla8t8)  (retract  7cellla8t9) 

(retract  7cellla8tlO)  (retract  ?eellla8tll)  (retract  7celll%8tl2) 

(retract  7cellla8tl3)  (retract  7cellla8tl4)  (retract  7cellla8tl5) 

(retract  7celllaatl6)  (retract  ?cellla8tl7)  (retract  7battla8tl) 

(retract  7battla8t2)  (retract  7batvlaatl)  (retract  7batvla8t2) 

(retract  7batila8tl)  (retract  7batlla8t2)  (retract  7txtla8tl) 

(retract  7txtla8t2)  (retract  7rxtla8tl)  (retract  7rxtla8t2)  (retract 

7bu8tla8tl)  (retract  7bu8vla8tl) 

) 
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APPENDIX  C. 


General  User  Commands 

LIST  \B\IAA\CS  "callsign”  transmit  list  of  message  and  bulletins 

\B  list  all  bulletins 
\U  list  all  messages  to  user  callsign 
\A  list  all  bulletins  and  messages 
\CS  "callsign"  list  all  messages  to  callsign  other  than 
users' 

d^uilt-  list  all  bulletins  and  messages  to  user 
callsign 

READ  \B,#VU,#\A\CS  "callsign",  #  read  messages  and  bulletins 

\B  read  all  bulletins 
\U  read  all  messages  to  user  callsign 
\A  read  all  bulletins  and  messages 
\CS  "callsign"  read  all  messages  to  callsign  other 
than  users' 

,#  read  oidy  message  or  bulletin  indicated  by 
number 

de&uit>  read  all  bulletins  and  messages  to  user 
callsign 

DEL  W  ddete  messages  to  user  callsign 

W  delete  message  indicated  by  number 

SEND  \"cailagn"\"filename"  send  a  message  to  another  user 

\"call»gn”  callsign  ofperson  to  receive  message 
\"filename”  file  that  contains  message  to  other 
callagn 

LOGON  \”callsign"  initialize  communications  link  with  satellite 

\"callsign"  official  callsign  of  user 

LOGOFF  end  session  with  satdlhe  and  break  communications 

link 


READIEL 


read  current  tdonetry  in  memory 


Ground  Control  Commands 


Includes  those  for  the  general  user  plus; 

DUMP  LIST  \B\M\A\CS  "callsign"  transmit  list  of  messages  and  bulletins 

\B  list  all  bulletins 

\M  list  all  messages 

\A  list  all  bulletins  and  messages 

\CS  "callsign"  list  all  messages  to  callsign 

defiuilt-  list  all  bulletins  and  messages 

DUMP  MAIL  \B\M\CS  "callsign"  transmit  messages  and  bulletins 

\B  send  all  bulletins 

\M  send  all  messages 

\A  send  all  bulletins  and  messages 

\CS  "callsign"  send  all  messages  to  callsign 

de&ult-  s«id  all  bulletins  and  messages 

POST  BULLETIN  \"filename"  post  a  bulletin  for  all  users  to  access 

\"filaiame"  file  that  contains  bulletin 

REMOVE  BULLETIN  W\T<time>  remove  a  bulletin  from  the  spacecraft  memory 

W  remove  bulletin  indicated  by  number 
\T<tinie>  remove  buUetin  at  specified  time 

PURGE  MAIL  \CS  "callsign",#\T<time>\A  ddete  mail 

\CS  "callsign"  delete  mail  to  callsign 
\T<time>  delete  mail  at  specified  time 
\A  delete  aU  mail 

,#  delete  message  indicated  by  number 
defrult-  ddete  aU  mail  to  user  callsign 

READ  CUR  TEL  read  oirrent  telemetry  in  memory 

READ  STOR  TEL  download  stored  telemetry  file  for  analysis 

DEL  STOR  TEL  ddete  information  stored  in  telemetry  file 

READ  OS  PAR  read  the  param^ers  of  the  operating  system, 

pointers,  etc. 

READ  DATA  W  read  data  values  in  memoiy  location 

\#  memory  location  indicated  by  number 


READ  CLOCK 


read  spacecraft  time 


SUPER  \<password> 


EXIT 


READ  CMOS 
READ  EVENTS 
Subsystem  Commands 


enter  the  super  user  mode 
\<password>  is  a  function  of  the  day  of  satellite 
operation,  will  be  found  in  a  table  format.  Allows 
the  satellite  to  execute  subsystem  commands. 

«dt  the  super  user  mode.  Satellite  will  no  longer 
accept  subsystem  commands  from  the  ground 
station  callsign. 

read  time  tagged  command  buffer 
read  event  log 


These  commands  require  that  the  user  has  ececuted  SUPER  conunand. 


CLRCMDS 
CLR  EVENTS 
SET  CLOCK  \<tiiiie> 

LD  SOFT  ^filename" 


RUN  SOFT^"addfess" 

DEL  SOFT\''address*\"size'' 


clear  time  tagged  command  buffer 

clear  event  log 

set  the  spacecraft  clock 

\<tinie>  time  to  set  as  soon  as  received 

send  request  to  load  software  with  size  of  code. 
\"filename”  file  that  contains  new  software,  has  size 
information  in  file 

de&ult-  load  new  software  and  wait  for  command  to 
b^in  executing  new  software 

begin  operations  using  new  software 
\”address"  b^inning  address  of  new  software  to  run 

ddete  software  at  load  address 
\”address"  location  of  b^inning  of  software  to  be 
deleted 

X^size”  size  of  software  to  be  ddleted 
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SET  TEL  \"filename"\T<tinie> 


DISCHBATT\A\B 

TRKLBATT\A\B 

CHRGBATT\A\B 

PROC\A\B 

RF\A\B 

MAILBOX  \A\B 

MUX\AVB 


set  polling  rates  for  the  satellite  telemetry 
\”filauune"  file  containing  the  new  polling  rates 
\T<time>  time  to  implement  new  polling  rates 
defiuilt-  implement  new  polling  rates  as  soon  as 
received 

Discharge  battery  A  or  B.  Only  one  can  discharge 
at  a  time. 

tridde  charge  battery 

\A\B  trickle  charge  battery  A  or  B  as  selected 
defiuilt-  trickle  charge  both  batteries 

charge  battery 

\A\B  charge  battery  A  or  B  as  selected 
de&ult-  charge  both  batteries 

set  processor 

\A\B  set  processor  A  or  B  to  be  operational 
defiuilt-  keq>  same  processor  operating,  send 
whidi  processor  is  operating 

Set  RF  selected 

\A\B  set  rf  section  A  or  B  to  be  operational 
defiuilt-  keep  same  rf  section  operating,  send 
which  rf  section  selected 


Set  Mailbox  to  be  used 
\A\B  set  mailbox  A  or  B  to  be  operational 
defiuiH-  keep  same  mailbox  operational,  said 
wiudi  mailbox  selected. 

Set  multiplexer  selected 
\A\B  set  multiplexer  A  or  B  to  be  operatiorud 
de&ult-  keep  same  muhiplexar  opoational,  said 
which  multiplexa  selected. 


MAXTX 


set  current  transmitta  to  max  powa  out 


MODE\BPSK\SS 


set  communications  mode 
\BPSK  select  BPSK  mode  for  communicanons 
\SS  select  spread  spectrum  for  communications 
defiuilt-  keep  same  communications  mode,  send 
which  communications  mode  satellite  is  in 

set  the  attenuation  on  the  current  transmitter 
\#  select  the  level  1-8  to  change  the  attenuation  level 
defiuilt-  keep  attenuation  levels  the  same,  send 
attenuation  level 
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